* lisp/simple.el (goto-line-read-args): More relevant default line number.

This commit is contained in:
Juri Linkov 2020-09-24 21:52:22 +03:00
parent 9bf9f699b1
commit 4bc4d19bd1

View file

@ -1259,7 +1259,11 @@ that uses or sets the mark."
;; In a narrowed buffer.
(if relative " relative" " absolute"))
buffer-prompt)
(list default (line-number-at-pos))
(list default (if (or relative (= (point-min) 1))
(line-number-at-pos)
(save-restriction
(widen)
(line-number-at-pos))))
'goto-line-history)
buffer))))