diff options
| author | Richard M. Stallman | 1994-10-04 22:57:42 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-10-04 22:57:42 +0000 |
| commit | 5f1a943cd23c093f9b003ae18845261dcc9ef369 (patch) | |
| tree | ee1bc8cf962c22c898472f2ad5d76ae96be48a6c | |
| parent | 701ca6c06bcef2edc18f4feeb3dae6f3652d5f0e (diff) | |
| download | emacs-5f1a943cd23c093f9b003ae18845261dcc9ef369.tar.gz emacs-5f1a943cd23c093f9b003ae18845261dcc9ef369.zip | |
(goto-line): Call prefix-numeric-value.
| -rw-r--r-- | lisp/simple.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index 7d46eede3af..9c729358fe1 100644 --- a/lisp/simple.el +++ b/lisp/simple.el | |||
| @@ -595,6 +595,7 @@ Get previous element of history which is a completion of minibuffer contents." | |||
| 595 | (defun goto-line (arg) | 595 | (defun goto-line (arg) |
| 596 | "Goto line ARG, counting from line 1 at beginning of buffer." | 596 | "Goto line ARG, counting from line 1 at beginning of buffer." |
| 597 | (interactive "NGoto line: ") | 597 | (interactive "NGoto line: ") |
| 598 | (setq arg (prefix-numeric-value arg)) | ||
| 598 | (save-restriction | 599 | (save-restriction |
| 599 | (widen) | 600 | (widen) |
| 600 | (goto-char 1) | 601 | (goto-char 1) |