From fe22eed0de1194c837aa61b1b2ad1ffb3ea46b4c Mon Sep 17 00:00:00 2001 From: John Paul Wallington Date: Sat, 17 May 2003 22:47:18 +0000 Subject: [PATCH] (number-to-register): Use `string-to-number' instead of `string-to-int'. --- lisp/ChangeLog | 10 +++++++++- lisp/register.el | 2 +- 2 files changed, 10 insertions(+), 2 deletions(-) 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 + + * 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 * which-func.el (which-func-format): Make it risky-local-variable. @@ -132,7 +140,7 @@ 2003-05-14 John Paul Wallington - * 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 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) -- 2.39.5