diff --git a/lisp/info.el b/lisp/info.el index 39f67b020c6..7feaf6b1649 100644 --- a/lisp/info.el +++ b/lisp/info.el @@ -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)))