(goto-line): Call prefix-numeric-value.

5f1a943c · Richard M. Stallman · 701ca6c0 · 5f1a943c
Commit 5f1a943c authored Oct 04, 1994 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 0 deletions

lisp/simple.el lisp/simple.el +1 -0

No files found.
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -595,6 +595,7 @@ Get previous element of history which is a completion of minibuffer contents."
 (defun goto-line (arg)
  "Goto line ARG, counting from line 1 at beginning of buffer."
  (interactive "NGoto line: ")
+  (setq arg (prefix-numeric-value arg))
  (save-restriction
    (widen)
    (goto-char 1)