[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] emacs-25 4c1370a: * lisp/help-fns.el (describe-function-1)

From: Glenn Morris
Subject: [Emacs-diffs] emacs-25 4c1370a: * lisp/help-fns.el (describe-function-1):
Date: Tue, 7 Jun 2016 20:43:10 +0000 (UTC)

branch: emacs-25
commit 4c1370a10b63766c95ec62a85f942c41a4152244
Author: Tino Calancha <address@hidden>
Commit: Glenn Morris <address@hidden>

    * lisp/help-fns.el (describe-function-1):
    Fix handling of file name for aliases.  (Bug#21950)
 lisp/help-fns.el |    3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 6e8a108..496deb5 100644
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -526,7 +526,8 @@ FILE is the file where FUNCTION was probably defined."
         (sig-key (if (subrp def)
                       (indirect-function 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)

reply via email to

[Prev in Thread] Current Thread [Next in Thread]