summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lisp/help-fns.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 346e1e158c2..d59eeab83e3 100644
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -381,7 +381,10 @@ suitable file is found, return nil."
(vectorp real-def))
(format "\nMacro: %s" (format-kbd-macro real-def)))
(t "[Missing arglist. Please make a bug report.]")))
- (high (help-highlight-arguments use doc)))
+ (high (help-highlight-arguments
+ ;; Quote any quotes in the function name (bug#20759).
+ (replace-regexp-in-string "\\(\\)[`']" "\\=" use t t 1)
+ doc)))
(let ((fill-begin (point)))
(insert (car high) "\n")
(fill-region fill-begin (point)))