[Emacs-diffs] /srv/bzr/emacs/trunk r99602: * info.el (Info-index-next): Decrement line number by 2. (Bug#5652)

[Juri Linkov]

------------------------------------------------------------
revno: 99602
committer: Juri Linkov <address@hidden>
branch nick: trunk
timestamp: Tue 2010-03-02 23:15:46 +0200
message:
  * info.el (Info-index-next): Decrement line number by 2.  (Bug#5652)
modified:
  lisp/ChangeLog
  lisp/info.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2010-03-02 09:32:45 +0000
+++ b/lisp/ChangeLog    2010-03-02 21:15:46 +0000
@@ -1,3 +1,7 @@
+2010-03-02  Juri Linkov  <address@hidden>
+
+       * info.el (Info-index-next): Decrement line number by 2.  (Bug#5652)
+
 2010-03-02  Michael Albinus  <address@hidden>
 
        * net/tramp.el (tramp-do-copy-or-rename-file-out-of-band): Fix an

=== modified file 'lisp/info.el'
--- a/lisp/info.el      2010-02-10 20:04:51 +0000
+++ b/lisp/info.el      2010-03-02 21:15:46 +0000
@@ -3062,7 +3062,7 @@
          num (1- num)))
   (Info-goto-node (nth 1 (car Info-index-alternatives)))
   (if (> (nth 3 (car Info-index-alternatives)) 0)
-      (forward-line (1- (nth 3 (car Info-index-alternatives))))
+      (forward-line (- (nth 3 (car Info-index-alternatives)) 2))
     (forward-line 3)                   ; don't search in headers
     (let ((name (car (car Info-index-alternatives))))
       (Info-find-index-name name)))