(info-apropos): Improve menu item regexp.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 308b3fdb02009f23f7bdd434a6dd13a624dd5c80..1bf1fe7d51ce89f01245fecc619d1185497b3e8e 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2004-04-09  Jesper Harder  <harder@ifa.au.dk>
+
+       * info.el (info-apropos): Improve menu item regexp.
+
 2004-04-09  Simon Josefsson  <jas@extundo.com>
 
        * mail/smtpmail.el: Add comment, based on report by

diff --git a/lisp/info.el b/lisp/info.el
index 173abe17a83d611230c99fbe8c322972e127ea35..4a05da999d4421089f611b494a4327f6bd7a4aae 100644 (file)
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -2441,7 +2441,7 @@ Build a menu of the possible matches."
        (message "Searching indices...")
        (goto-char (point-min))
        (re-search-forward "\\* Menu: *\n" nil t)
-       (while (re-search-forward "\\*.*: (\\([^)]+\\))" nil t)
+       (while (re-search-forward "\\*.*: *(\\([^)]+\\))" nil t)
          (add-to-list 'manuals (match-string 1)))
        (dolist (manual manuals)
          (message "Searching %s" manual)