diff options
| author | Andrea Corallo <akrl@sdf.org> | 2023-02-21 14:58:28 +0100 |
|---|---|---|
| committer | Andrea Corallo <akrl@sdf.org> | 2023-02-21 16:39:39 +0100 |
| commit | 68df9e5953c881d390fdb14fc774c3cd45060ba4 (patch) | |
| tree | 74647af7a24a3308b911edb27979c6796be8aed5 /lisp/emacs-lisp/comp.el | |
| parent | 06ba9484166a57bf7f307d6e847e1c0bd725950f (diff) | |
| download | emacs-68df9e5953c881d390fdb14fc774c3cd45060ba4.tar.gz emacs-68df9e5953c881d390fdb14fc774c3cd45060ba4.tar.bz2 emacs-68df9e5953c881d390fdb14fc774c3cd45060ba4.zip | |
* lisp/emacs-lisp/comp.el (comp--trampoline-abs-filename): Improve 5d0b45cd67b
Diffstat (limited to 'lisp/emacs-lisp/comp.el')
| -rw-r--r-- | lisp/emacs-lisp/comp.el | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el index a0b18ea864f..046d169f00f 100644 --- a/lisp/emacs-lisp/comp.el +++ b/lisp/emacs-lisp/comp.el @@ -3812,10 +3812,8 @@ Return the trampoline if found or nil otherwise." ;; Default to some temporary directory if no better option was ;; found. finally (cl-return - (expand-file-name - (make-temp-file (file-name-sans-extension rel-filename) 0 ".eln" - nil) - temporary-file-directory)))) + (make-temp-file (file-name-sans-extension rel-filename) nil ".eln" + nil)))) (defun comp-trampoline-compile (subr-name) "Synthesize compile and return a trampoline for SUBR-NAME." |