From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Mon, 3 Dec 2001 04:26:43 +0000 (+0000)
Subject: Add explanatory comment.
X-Git-Tag: ttn-vms-21-2-B4~17920
X-Git-Url: https://code.delx.au/gnu-emacs/commitdiff_plain/2d12f5c2dcdbd8cf10e00e8f31eaf843e0e172f6

Add explanatory comment.
---

diff --git a/lisp/info.el b/lisp/info.el
index 660af03c95..164c5e9d1f 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -1406,6 +1406,13 @@ FOOTNOTENAME may be an abbreviation of the reference name."
 (defvar Info-complete-cache nil)
 
 (defun Info-complete-menu-item (string predicate action)
+  ;; This uses two dynamically bound variables:
+  ;; - `Info-complete-menu-buffer' which contains the buffer in which
+  ;; is the menu of items we're trying to complete.
+  ;; - `Info-complete-next-re' which, if non-nil, indicates that we should
+  ;; also look for menu items in subsequent nodes as long as those
+  ;; nodes' names match `Info-complete-next-re'.  This feature is currently
+  ;; only used for completion in Info-index.
   (save-excursion
     (set-buffer Info-complete-menu-buffer)
     (let ((completion-ignore-case t)