From: Juri Linkov Date: Tue, 2 Mar 2010 21:15:46 +0000 (+0200) Subject: * info.el (Info-index-next): Decrement line number by 2. (Bug#5652) X-Git-Tag: emacs-pretest-23.1.94~18 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7187cdaef8a35b0d1338953230fc25dda4c30bbb;p=emacs.git * info.el (Info-index-next): Decrement line number by 2. (Bug#5652) --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 7beebd130b1..607154f9c3c 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2010-03-02 Juri Linkov + + * info.el (Info-index-next): Decrement line number by 2. (Bug#5652) + 2010-03-02 Michael Albinus * net/tramp.el (tramp-do-copy-or-rename-file-out-of-band): Fix an diff --git a/lisp/info.el b/lisp/info.el index 93001496b5c..690fa4ff8e0 100644 --- a/lisp/info.el +++ b/lisp/info.el @@ -3062,7 +3062,7 @@ Give an empty topic name to go to the Index node itself." 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)))