emacs-diffs
[Top][All Lists]
Advanced

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

emacs-29 68df9e5953c: * lisp/emacs-lisp/comp.el (comp--trampoline-abs-fi


From: Andrea Corallo
Subject: emacs-29 68df9e5953c: * lisp/emacs-lisp/comp.el (comp--trampoline-abs-filename): Improve 5d0b45cd67b
Date: Tue, 21 Feb 2023 10:39:59 -0500 (EST)

branch: emacs-29
commit 68df9e5953c881d390fdb14fc774c3cd45060ba4
Author: Andrea Corallo <akrl@sdf.org>
Commit: Andrea Corallo <akrl@sdf.org>

    * lisp/emacs-lisp/comp.el (comp--trampoline-abs-filename): Improve 
5d0b45cd67b
---
 lisp/emacs-lisp/comp.el | 6 ++----
 1 file 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."



reply via email to

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