Explain recent change to log-view.el

2 files changed, 8 insertions, 0 deletions

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  <dancol@dancol.org>
+
+        * 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  <cyd@gnu.org>
 
         * 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)