(forms--change-commands): Use command remapping instead of

[gnu-emacs] / lisp / info.el

diff --git a/lisp/info.el b/lisp/info.el
index 836c8287ebef3935edf8b60c02437e59d4ffb9d2..ed323d6e7f090cb707ecc51ce62c7172e8189bd3 100644 (file)
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -1543,9 +1543,9 @@ FOOTNOTENAME may be an abbreviation of the reference name."
            (unless (equal Info-current-node orignode)
              (Info-goto-node orignode))
            ;; Update the cache.
-           (setq Info-complete-cache
-                 (list Info-current-file Info-current-node
-                       Info-complete-next-re string completions)))
+           (set (make-local-variable 'Info-complete-cache)
+                (list Info-current-file Info-current-node
+                      Info-complete-next-re string completions)))
          (if action
              (all-completions string completions predicate)
            (try-completion string completions predicate)))))))