diff options
| author | John Paul Wallington | 2003-05-17 22:47:18 +0000 |
|---|---|---|
| committer | John Paul Wallington | 2003-05-17 22:47:18 +0000 |
| commit | fe22eed0de1194c837aa61b1b2ad1ffb3ea46b4c (patch) | |
| tree | 6cd2e82e75009f912d3fc9ee074675ae52fe4246 /lisp/register.el | |
| parent | 6612afc0d20901bcc6ad30743a7f90b81a9c0e4b (diff) | |
| download | emacs-fe22eed0de1194c837aa61b1b2ad1ffb3ea46b4c.tar.gz emacs-fe22eed0de1194c837aa61b1b2ad1ffb3ea46b4c.zip | |
(number-to-register): Use `string-to-number' instead
of `string-to-int'.
Diffstat (limited to 'lisp/register.el')
| -rw-r--r-- | lisp/register.el | 2 |
1 files changed, 1 insertions, 1 deletions
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)." | |||
| 146 | (if (looking-at "\\s-*-?[0-9]+") | 146 | (if (looking-at "\\s-*-?[0-9]+") |
| 147 | (progn | 147 | (progn |
| 148 | (goto-char (match-end 0)) | 148 | (goto-char (match-end 0)) |
| 149 | (string-to-int (match-string 0))) | 149 | (string-to-number (match-string 0))) |
| 150 | 0)))) | 150 | 0)))) |
| 151 | 151 | ||
| 152 | (defun increment-register (number register) | 152 | (defun increment-register (number register) |