procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Escape any quotes in the function name

Browse source 
* lisp/help-fns.el (help-fns--signature): Quote any quotes in the
function name (bug#20759).
This commit is contained in:
Dmitry Gutov 2015-06-07 23:39:18 +03:00
parent aa83b5ecb0
commit 866cda36cc
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/help-fns.el
View file

@ -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)))