changeset 94870:9ba92386b1f2

(Info-next-preorder): Let-bind `Info-history' to nil before recursive call to `Info-next-preorder' to not add intermediate nodes to the history.
author Juri Linkov <juri@jurta.org>
date Sun, 11 May 2008 20:31:45 +0000
parents c8e2322a0865
children 41d345675cae
files lisp/info.el
diffstat 1 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/info.el	Sun May 11 20:31:18 2008 +0000
+++ b/lisp/info.el	Sun May 11 20:31:45 2008 +0000
@@ -2526,8 +2526,10 @@
 	 ;; go up to the end of this node.
 	 (goto-char (point-max))
 	 ;; Since logically we are done with the node with that menu,
-	 ;; move on from it.
-	 (Info-next-preorder))
+	 ;; move on from it.  But don't add intermediate nodes
+	 ;; to the history on recursive calls.
+	 (let (Info-history)
+	   (Info-next-preorder)))
 	(t
 	 (error "No more nodes"))))