Mercurial > emacs

changeset 10758:a66a29e6efc9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Info-index): Bind Info-history, not Info-keep-history.
author Richard M. Stallman <rms@gnu.org>
date Wed, 15 Feb 1995 08:36:09 +0000
parents 2829c9840b0e
children fe6bdcb0d99f
files lisp/info.el
diffstat 1 files changed, 7 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/info.el	Wed Feb 15 08:06:32 1995 +0000
+++ b/lisp/info.el	Wed Feb 15 08:36:09 1995 +0000
@@ -1210,12 +1210,17 @@
     (or (re-search-forward "\n\\* \\(.*\\<Index\\>\\)" nil t)
 	(error "No index"))
     (goto-char (match-beginning 1))
-    (let ((Info-keeping-history nil))
+    ;; Here, and subsequently in this function,
+    ;; we bind Info-history to nil for internal node-switches
+    ;; so that we don't put junk in the history.
+    ;; In the first Info-goto-node call, above, we do update the history
+    ;; because that is what the user's previous node choice into it.
+    (let ((Info-history nil))
       (Info-goto-node (Info-extract-menu-node-name)))
     (or (equal topic "")
 	(let ((matches nil)
 	      (exact nil)
-	      (Info-keeping-history nil)
+	      (Info-history nil)
 	      found)
 	  (while
 	      (progn