From ca722adbaa7d7ee50cf4bdeeb9d4c89a9cd4131b Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Sat, 14 Mar 1998 09:08:26 +0000 Subject: [PATCH] (texinfo-incorporate-menu-entry-names) (texinfo-start-menu-description): Call regexp-quote. --- lisp/textmodes/texnfo-upd.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/lisp/textmodes/texnfo-upd.el b/lisp/textmodes/texnfo-upd.el index 22d9fc60538..1f8b0590807 100644 --- a/lisp/textmodes/texnfo-upd.el +++ b/lisp/textmodes/texnfo-upd.el @@ -498,7 +498,8 @@ appears in the texinfo file." ;; ;; We're interested in the second case. (concat "\\* " ; so only menu entries are found - "\\(.*\\): " (car (car new-menu-list)) "[.,\t\n]") + "\\(.*\\): " (regexp-quote (car (car new-menu-list))) + "[.,\t\n]") end-of-menu t) (setcar @@ -650,7 +651,7 @@ complements the node name rather than repeats it as a title does." (if (re-search-forward (concat "^@node[ \t]+" - node-name + (regexp-quote node-name) ".*\n" ; match node line "\\(" "\\(\\(^@c \\|^@comment\\).*\n\\)" ; match comment line, if any -- 2.39.2