Mercurial > emacs

diff lisp/info.el @ 107333:ef2a56409ad3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add a comment for the previous commit.
author Juri Linkov <juri@jurta.org>
date Wed, 03 Mar 2010 21:23:20 +0200
parents f220632d1439
children 78dd74750b2b b8efa032f216
line wrap: on
line diff
--- a/lisp/info.el	Wed Mar 03 12:31:50 2010 -0500
+++ b/lisp/info.el	Wed Mar 03 21:23:20 2010 +0200
@@ -3062,6 +3062,8 @@
 	  num (1- num)))
   (Info-goto-node (nth 1 (car Info-index-alternatives)))
   (if (> (nth 3 (car Info-index-alternatives)) 0)
+      ;; Forward 2 lines less because `Info-find-node-2' initially
+      ;; puts point to the 2nd line.
       (forward-line (- (nth 3 (car Info-index-alternatives)) 2))
     (forward-line 3)			; don't search in headers
     (let ((name (car (car Info-index-alternatives))))