changeset 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 cb587792069b
children 9c5588c1db7c
files lisp/info.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
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)