Commit 3ffefa79 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(Info-follow-reference): Use regexp-quote.

parent 18f29056
......@@ -828,7 +828,7 @@ NAME may be an abbreviation of the reference name."
(list (if (equal input "")
default input)))
(error "No cross-references in this node"))))
(let (target beg i (str (concat "\\*note " footnotename)))
(let (target beg i (str (concat "\\*note " (regexp-quote footnotename))))
(while (setq i (string-match " " str i))
(setq str (concat (substring str 0 i) "[ \t\n]+" (substring str (1+ i))))
(setq i (+ i 6)))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment