(texinfo-incorporate-menu-entry-names)

(texinfo-start-menu-description): Call regexp-quote.

1 files 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