diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/simple.el | 9 |
2 files changed, 10 insertions, 4 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index afa15eab24e..8b92eab8579 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2011-07-28 Jose E. Marchesi <jemarch@gnu.org> + + * simple.el (goto-line): Use string-to-number to provide a + numeric argument to read-number. + 2011-07-27 Michael Albinus <michael.albinus@gmx.de> * net/tramp-sh.el (tramp-maybe-send-script): Don't let-bind the diff --git a/lisp/simple.el b/lisp/simple.el index 7fd7e20b499..fe46e36fdac 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -900,10 +900,11 @@ rather than line counts." (save-excursion (skip-chars-backward "0-9") (if (looking-at "[0-9]") - (buffer-substring-no-properties - (point) - (progn (skip-chars-forward "0-9") - (point)))))) + (string-to-number + (buffer-substring-no-properties + (point) + (progn (skip-chars-forward "0-9") + (point))))))) ;; Decide if we're switching buffers. (buffer (if (consp current-prefix-arg) |