diff options
| author | Andrea Corallo <akrl@sdf.org> | 2021-04-25 20:06:22 +0200 |
|---|---|---|
| committer | Andrea Corallo <akrl@sdf.org> | 2021-04-25 20:06:22 +0200 |
| commit | 289000eee729689b0cf362a21baa40ac7f9506f6 (patch) | |
| tree | 04e59d0f2bd7111749d8d97f829a410d4602a247 /lisp/emacs-lisp/autoload.el | |
| parent | 8f63f0078a23421eada97b4da51b9308b82532ce (diff) | |
| parent | fa65c044f2ebe666467166075c1507a8d0e1347f (diff) | |
| download | emacs-289000eee729689b0cf362a21baa40ac7f9506f6.tar.gz emacs-289000eee729689b0cf362a21baa40ac7f9506f6.tar.bz2 emacs-289000eee729689b0cf362a21baa40ac7f9506f6.zip | |
Merge branch 'feature/native-comp' into into trunk
Diffstat (limited to 'lisp/emacs-lisp/autoload.el')
| -rw-r--r-- | lisp/emacs-lisp/autoload.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/autoload.el b/lisp/emacs-lisp/autoload.el index ae17039645a..b45984be1d5 100644 --- a/lisp/emacs-lisp/autoload.el +++ b/lisp/emacs-lisp/autoload.el @@ -170,7 +170,9 @@ expression, in which case we want to handle forms differently." define-inline cl-defun cl-defmacro cl-defgeneric cl-defstruct pcase-defmacro)) (macrop car) - (setq expand (let ((load-file-name file)) (macroexpand form))) + (setq expand (let ((load-true-file-name file) + (load-file-name file)) + (macroexpand form))) (memq (car expand) '(progn prog1 defalias))) (make-autoload expand file 'expansion)) ;Recurse on the expansion. |