From: Daniel Colascione Date: Tue, 7 Jan 2014 06:00:16 +0000 (-0800) Subject: Explain recent change to log-view.el X-Git-Tag: emacs-24.3.90~173^2^2~42^2~45^2~387^2~39 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ee916ed0380b5cfb00bfc1257056ab71f59bd4a2;p=emacs.git Explain recent change to log-view.el --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 48f11813d49..ee11efdc7eb 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2014-01-07 Daniel Colascione + + * vc/log-view.el (log-view-beginning-of-defun): Add comment + explaining why we call `log-view-end-of-defun'. + 2014-01-07 Chong Yidong * isearch.el (isearch-yank-char, isearch-yank-word) 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)