summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorAndrea Corallo <akrl@sdf.org>2021-03-31 20:29:32 +0200
committerAndrea Corallo <akrl@sdf.org>2021-03-31 20:38:32 +0200
commit8e524f459149dfd83e2205d24c174074b10d5c6a (patch)
tree1905463475650379f0aff81c11e92780fe3120a4 /lisp/emacs-lisp
parent53ca0d98441da75be49111a3a88c1a7629f27d6d (diff)
downloademacs-8e524f459149dfd83e2205d24c174074b10d5c6a.tar.gz
emacs-8e524f459149dfd83e2205d24c174074b10d5c6a.tar.bz2
emacs-8e524f459149dfd83e2205d24c174074b10d5c6a.zip
* lisp/emacs-lisp/comp.el (comp-final): Clean-up temporary file.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/comp.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index 59e9dbc0138..213eb7b4126 100644
--- a/lisp/emacs-lisp/comp.el
+++ b/lisp/emacs-lisp/comp.el
@@ -3666,7 +3666,9 @@ Prepare every function for final compilation and drive the C back-end."
(call-process (expand-file-name invocation-name
invocation-directory)
nil t t "--batch" "-l" temp-file))
- output
+ (progn
+ (delete-file temp-file)
+ output)
(signal 'native-compiler-error (buffer-string)))
(comp-log-to-buffer (buffer-string))))))))