From 0383ed602c21f9f7c619ef0538bb53433ceabc17 Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Wed, 29 Nov 2000 20:05:46 +0000 Subject: [PATCH] (describe-function-1): Regexp-quote function name when used as part of a regexp. --- lisp/ChangeLog | 3 +++ lisp/help.el | 2 +- 2 files changed, 4 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index b0df672d4f1..8b82addf684 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2000-11-29 Gerd Moellmann + * 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. diff --git a/lisp/help.el b/lisp/help.el index b3e726ba27c..2690cdc9c04 100644 --- a/lisp/help.el +++ b/lisp/help.el @@ -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) -- 2.39.5