diff lisp/info.el @ 51784:abcb358beb61

(Info-menu): Use Info-menu-entry-name-re.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Mon, 07 Jul 2003 14:46:00 +0000
parents e335a2d06fd8
children 7a3de98ae801
line wrap: on
line diff
--- a/lisp/info.el	Mon Jul 07 01:46:10 2003 +0000
+++ b/lisp/info.el	Mon Jul 07 14:46:00 2003 +0000
@@ -1652,7 +1652,9 @@
 	    (save-excursion
 	      (goto-char p)
 	      (end-of-line)
-	      (if (re-search-backward "\n\\* +\\([^\t\n]*\\):" beg t)
+	      (if (re-search-backward (concat "\n\\* +\\("
+					      Info-menu-entry-name-re
+					      "\\):") beg t)
 		  (setq default (match-string-no-properties 1))))))
      (let ((item nil))
        (while (null item)