Add explanatory comment.

diff --git a/lisp/info.el b/lisp/info.el
index 660af03c959fbf57c35c7e9111b4b2317044d32a..164c5e9d1f5b95d7ba5fcefae5c5309ef04e9a85 100644 (file)
--- 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)