mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-13 09:32:47 +00:00
Code Issues Releases Activity

* lisp/vc/log-view.el (log-view-diff-common): Use the previous revision

Browse Source 
only when the end of the region is on a line after the last entry.
(Bug#35624)
This commit is contained in:
Juri Linkov 2019-05-13 23:40:11 +03:00
parent f515bc6398
commit cd5b0538c5
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lisp/vc/log-view.el
View File

@ -618,10 +618,11 @@ considered file(s)."
;; When TO and FR are the same, or when point is on a line after
;; the last entry, look at the previous revision.
(when (or (string-equal fr to)
(>= (point)
(>= end
(save-excursion
(goto-char (car fr-entry))
(forward-line))))
(goto-char end)
(log-view-end-of-defun)
(point))))
(setq fr (vc-call-backend log-view-vc-backend 'previous-revision nil fr)))
(vc-diff-internal
t (list log-view-vc-backend