aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/info.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/info.el b/lisp/info.el
index 690fa4ff8e0..a1ce05d6292 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -3062,6 +3062,8 @@ Give an empty topic name to go to the Index node itself."
3062 num (1- num))) 3062 num (1- num)))
3063 (Info-goto-node (nth 1 (car Info-index-alternatives))) 3063 (Info-goto-node (nth 1 (car Info-index-alternatives)))
3064 (if (> (nth 3 (car Info-index-alternatives)) 0) 3064 (if (> (nth 3 (car Info-index-alternatives)) 0)
3065 ;; Forward 2 lines less because `Info-find-node-2' initially
3066 ;; puts point to the 2nd line.
3065 (forward-line (- (nth 3 (car Info-index-alternatives)) 2)) 3067 (forward-line (- (nth 3 (car Info-index-alternatives)) 2))
3066 (forward-line 3) ; don't search in headers 3068 (forward-line 3) ; don't search in headers
3067 (let ((name (car (car Info-index-alternatives)))) 3069 (let ((name (car (car Info-index-alternatives))))