mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-27 15:40:47 -08:00
Code Issues Projects Releases Wiki Activity

Allow help-C-file-name to work on symbols designating subrs

Browse source 
* lisp/help-fns.el (help-C-file-name): Allow working on symbols
designating subrs (bug#14932).
This commit is contained in:
Lars Ingebrigtsen 2021-05-30 08:25:06 +02:00
parent db1de74e73
commit c8ec798d70
1 changed files with 3 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/help-fns.el
View file

@ -268,7 +268,9 @@ If we can't find the file name, nil is returned."
(let ((docbuf (get-buffer-create " *DOC*"))
(name (if (eq 'var kind)
(concat "V" (symbol-name subr-or-var))
(concat "F" (subr-name (advice--cd*r subr-or-var))))))
(concat "F" (if (symbolp subr-or-var)
(symbol-name subr-or-var)
(subr-name (advice--cd*r subr-or-var)))))))
(with-current-buffer docbuf
(goto-char (point-min))
(if (eobp)