mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-16 10:50:49 -08:00
Code Issues Projects Releases Wiki Activity

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

Browse source 
of `string-to-int'.
This commit is contained in:
John Paul Wallington 2003-05-17 22:47:18 +00:00
parent 6612afc0d2
commit fe22eed0de
2 changed files with 10 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

10
lisp/ChangeLog
View file

@ -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> 2003-05-17 Stefan Monnier <monnier@cs.yale.edu>
* which-func.el (which-func-format): Make it risky-local-variable. * which-func.el (which-func-format): Make it risky-local-variable.
@ -132,7 +140,7 @@
2003-05-14 John Paul Wallington <jpw@gnu.org> 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. `ls-lisp-use-insert-directory-program' is nil.
2003-05-13 Stefan Monnier <monnier@cs.yale.edu> 2003-05-13 Stefan Monnier <monnier@cs.yale.edu>

2
lisp/register.el
View file

@ -146,7 +146,7 @@ Interactively, NUMBER is the prefix arg (none means nil)."
(if (looking-at "\\s-*-?[0-9]+") (if (looking-at "\\s-*-?[0-9]+")
(progn (progn
(goto-char (match-end 0)) (goto-char (match-end 0))
(string-to-int (match-string 0))) (string-to-number (match-string 0)))
0)))) 0))))
(defun increment-register (number register) (defun increment-register (number register)