mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-10 15:56:18 +00:00
(symbol-file): Fix C-h v pcase
where cl-struct
lacks file info
* lisp/subr.el (symbol-file): Return an actual (and absolute) file name for the autoload case, as is done for other cases.
This commit is contained in:
parent
e807d62cdd
commit
0886ef01a8
@ -3067,7 +3067,8 @@ instead."
|
||||
(if (and (or (null type) (eq type 'defun))
|
||||
(symbolp symbol)
|
||||
(autoloadp (symbol-function symbol)))
|
||||
(nth 1 (symbol-function symbol))
|
||||
(locate-library
|
||||
(nth 1 (symbol-function symbol)))
|
||||
(if (and native-p (or (null type) (eq type 'defun))
|
||||
(symbolp symbol)
|
||||
(native-comp-available-p)
|
||||
|
Loading…
Reference in New Issue
Block a user