From: John Paul Wallington <jpw@pobox.com>
Date: Sat, 17 May 2003 22:47:18 +0000 (+0000)
Subject: (number-to-register): Use `string-to-number' instead
X-Git-Tag: ttn-vms-21-2-B4~10111
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=fe22eed0de1194c837aa61b1b2ad1ffb3ea46b4c;p=emacs.git

(number-to-register): Use `string-to-number' instead
of `string-to-int'.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index af840feb1e1..b8e16327634 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,11 @@
+2003-05-17  John Paul Wallington  <jpw@gnu.org>
+
+	* international/ja-dic-cnv.el (skkdic-okuri-nasi-entries)
+	(skkdic-okuri-nasi-entries-count): Use defvar for non-constants.
+
+	* register.el (number-to-register): Use `string-to-number' instead
+	of `string-to-int'.
+
 2003-05-17  Stefan Monnier  <monnier@cs.yale.edu>
 
 	* which-func.el (which-func-format): Make it risky-local-variable.
@@ -132,7 +140,7 @@
 
 2003-05-14  John Paul Wallington  <jpw@gnu.org>
 
-	* ls-lisp.el (insert-directory): Remove --dired switch when
+	* ls-lisp.el (insert-directory): Discard --dired switch when
 	`ls-lisp-use-insert-directory-program' is nil.
 
 2003-05-13  Stefan Monnier  <monnier@cs.yale.edu>
diff --git a/lisp/register.el b/lisp/register.el
index 17c804afbd9..d550858eba7 100644
--- a/lisp/register.el
+++ b/lisp/register.el
@@ -146,7 +146,7 @@ Interactively, NUMBER is the prefix arg (none means nil)."
 		  (if (looking-at "\\s-*-?[0-9]+")
 		      (progn
 			(goto-char (match-end 0))
-			(string-to-int (match-string 0)))
+			(string-to-number (match-string 0)))
 		    0))))
 
 (defun increment-register (number register)