Mercurial > emacs

diff lisp/add-log.el @ 97767:c7ba169cff4f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(change-log-next-error): Run an extra `find-file' to go to the position of interest.
author Teodor Zlatanov <tzz@lifelogs.com>
date Wed, 27 Aug 2008 18:29:44 +0000
parents ed0e9fcb94ac
children 62d20088701e
line wrap: on
line diff
--- a/lisp/add-log.el	Wed Aug 27 17:23:29 2008 +0000
+++ b/lisp/add-log.el	Wed Aug 27 18:29:44 2008 +0000
@@ -543,7 +543,10 @@
   (beginning-of-line)
   ;; if we found a place to visit...
   (when (looking-at change-log-file-names-re)
-    (change-log-goto-source)))
+    (change-log-goto-source)
+    ;; go to the file itself
+    (let ((file (nth 2 change-log-find-head)))
+      (when file (find-file file)))))
 
 (defvar change-log-mode-map
   (let ((map (make-sparse-keymap)))