summaryrefslogtreecommitdiff
path: root/lisp/vc/log-view.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/vc/log-view.el')
-rw-r--r--lisp/vc/log-view.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/vc/log-view.el b/lisp/vc/log-view.el
index bacf96c4677..484e40f7ac0 100644
--- a/lisp/vc/log-view.el
+++ b/lisp/vc/log-view.el
@@ -431,6 +431,9 @@ It assumes that a log entry starts with a line matching
`log-view-message-re'."
(when (null arg) (setf arg 1))
(if (< arg 0)
+ ;; In log view, the end of one defun is the beginning of the
+ ;; next, so punting to log-view-end-of-defun is safe in this
+ ;; context.
(log-view-end-of-defun (- arg))
(let ((found t))
(while (> arg 0)