Keep vc-print-log from putting point at buffer end (Bug#31764)
* lisp/vc/vc.el (vc-print-log-internal): Use `save-excursion' around `vc-print-log-setup-buttons'.
This commit is contained in:
parent
b635c548c6
commit
fcd66d059c
1 changed files with 3 additions and 2 deletions
|
@ -2256,8 +2256,9 @@ earlier revisions. Show up to LIMIT entries (non-nil means unlimited)."
|
||||||
(vc-call-backend bk 'print-log files-arg buf shortlog
|
(vc-call-backend bk 'print-log files-arg buf shortlog
|
||||||
(when is-start-revision working-revision) limit))
|
(when is-start-revision working-revision) limit))
|
||||||
(lambda (_bk _files-arg ret)
|
(lambda (_bk _files-arg ret)
|
||||||
(vc-print-log-setup-buttons working-revision
|
(save-excursion
|
||||||
is-start-revision limit ret))
|
(vc-print-log-setup-buttons working-revision
|
||||||
|
is-start-revision limit ret)))
|
||||||
;; When it's nil, point really shouldn't move (bug#15322).
|
;; When it's nil, point really shouldn't move (bug#15322).
|
||||||
(when working-revision
|
(when working-revision
|
||||||
(lambda (bk)
|
(lambda (bk)
|
||||||
|
|
Loading…
Add table
Reference in a new issue