* lisp/help-fns.el (describe-function-1):

Fix handling of file name for aliases.  (Bug#21950)
This commit is contained in:
Tino Calancha 2016-06-07 16:42:59 -04:00 committed by Glenn Morris
parent a3f7ae80b1
commit 4c1370a10b

View file

@ -526,7 +526,8 @@ FILE is the file where FUNCTION was probably defined."
(sig-key (if (subrp def)
(indirect-function real-def)
real-def))
(file-name (find-lisp-object-file-name function def))
(file-name (find-lisp-object-file-name function (if aliased 'defun
def)))
(pt1 (with-current-buffer (help-buffer) (point)))
(beg (if (and (or (byte-code-function-p def)
(keymapp def)