mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-27 10:54:40 +00:00
Code Issues Releases Activity

(Info-menu): Use Info-menu-entry-name-re.

Browse Source
This commit is contained in:
Stefan Monnier 2003-07-07 14:46:00 +00:00
parent b93fb365b3
commit 00d32b3f98
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/info.el
View File

@ -1652,7 +1652,9 @@ new buffer."
(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)