# HG changeset patch
# User Juri Linkov <juri@jurta.org>
# Date 1267644200 -7200
# Node ID ef2a56409ad3026331c13d784d22a00d41dbc98b
# Parent  e09a216f2aab3f715f51ede2f5f7c8f6b3d140d6
Add a comment for the previous commit.

diff -r e09a216f2aab -r ef2a56409ad3 lisp/info.el
--- 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))))