# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1172680096 0
# Node ID 8e2b98658b1544fe052e75286922734a69b3f3e7
# Parent  121fd51d6c1396566b25bf531796e6f80331bd64
(emacs-major-version, emacs-minor-version): string-to-int -> string-to-number.

diff -r 121fd51d6c13 -r 8e2b98658b15 lisp/ChangeLog
--- a/lisp/ChangeLog	Wed Feb 28 13:01:34 2007 +0000
+++ b/lisp/ChangeLog	Wed Feb 28 16:28:16 2007 +0000
@@ -1,3 +1,8 @@
+2007-02-28  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* version.el (emacs-major-version, emacs-minor-version):
+	string-to-int -> string-to-number.
+
 2007-02-28  Juanma Barranquero  <lekktu@gmail.com>
 
 	* help.el (where-is): Fail gracefully when not passed a command.
diff -r 121fd51d6c13 -r 8e2b98658b15 lisp/version.el
--- a/lisp/version.el	Wed Feb 28 13:01:34 2007 +0000
+++ b/lisp/version.el	Wed Feb 28 16:28:16 2007 +0000
@@ -32,13 +32,13 @@
 
 (defconst emacs-major-version
   (progn (string-match "^[0-9]+" emacs-version)
-	 (string-to-int (match-string 0 emacs-version)))
+	 (string-to-number (match-string 0 emacs-version)))
   "Major version number of this version of Emacs.
 This variable first existed in version 19.23.")
 
 (defconst emacs-minor-version
   (progn (string-match "^[0-9]+\\.\\([0-9]+\\)" emacs-version)
-	 (string-to-int (match-string 1 emacs-version)))
+	 (string-to-number (match-string 1 emacs-version)))
   "Minor version number of this version of Emacs.
 This variable first existed in version 19.23.")
 
@@ -92,5 +92,5 @@
 ;;version-control: never
 ;;End:
 
-;;; arch-tag: e60dc445-6218-4a4c-a7df-f15a818642a0
+;; arch-tag: e60dc445-6218-4a4c-a7df-f15a818642a0
 ;;; version.el ends here