* lisp/vc/log-view.el (log-view-diff-common): Use the previous revision
only when the end of the region is on a line after the last entry. (Bug#35624)
This commit is contained in:
parent
f515bc6398
commit
cd5b0538c5
1 changed files with 4 additions and 3 deletions
|
@ -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
|
||||
|
|
Loading…
Add table
Reference in a new issue