Commit 0383ed60 authored by Gerd Moellmann's avatar Gerd Moellmann
Browse files

(describe-function-1): Regexp-quote function name

when used as part of a regexp.
parent c7957947
2000-11-29 Gerd Moellmann <gerd@gnu.org>
* help.el (describe-function-1): Regexp-quote function name
when used as part of a regexp.
* toolbar/tool-bar.el (tool-bar-add-item-from-menu): Use
face-attribute instead of face-foreground and face-background.
(tool-bar-add-item): Likewise, and handle unspecified colors.
......
......@@ -744,7 +744,7 @@ It can also be nil, if the definition is not associated with any file."
(name (progn
(string-match " \\([^ ]+\\)>$" rep)
(match-string 1 rep))))
(if (looking-at (format "(%s[ )]" name))
(if (looking-at (format "(%s[ )]" (regexp-quote name)))
(let ((start (point-marker)))
(goto-char (point-min))
(forward-paragraph)
......
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