(Info-extract-menu-item): Quote `*' in the menu-item

leadin re-search to prevent us from finding node names which contain the text of another node name within them.

(Info-extract-menu-item): Quote `*' in the menu-item
leadin re-search to prevent us from finding node names which contain the text of another node name within them.
de3fa0b2 · Richard M. Stallman · c6fcafde · de3fa0b2
Commit de3fa0b2 authored Nov 10, 1993 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 2 deletions

lisp/info.el lisp/info.el +2 -2

No files found.
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -844,8 +844,8 @@ Completion is allowed, and the menu item point is on is the default."
    (goto-char (point-min))
    (or (search-forward "\n* menu:" nil t)
 	(error "No menu in this node"))
-    (or (re-search-forward (concat "\n* " menu-item ":") nil t)
-	(re-search-forward (concat "\n* " menu-item) nil t)
+    (or (re-search-forward (concat "\n\\* " menu-item ":") nil t)
+	(re-search-forward (concat "\n\\* " menu-item) nil t)
 	(error "No such item in menu"))
    (beginning-of-line)
    (forward-char 2)