]> git.eshelyaron.com Git - emacs.git/commitdiff
* lisp/emacs-lisp/comp.el (batch-byte+native-compile): Fix unwind form
authorAndrea Corallo <akrl@sdf.org>
Mon, 24 Jan 2022 14:29:38 +0000 (15:29 +0100)
committerAndrea Corallo <akrl@sdf.org>
Tue, 25 Jan 2022 16:47:34 +0000 (17:47 +0100)
lisp/emacs-lisp/comp.el

index 3c61063a3cbb1e17150ed848f43fa58e7826c394..71914b2f2b76ea0b22364589038c8244acde83ce 100644 (file)
@@ -4217,8 +4217,8 @@ variable 'NATIVE_DISABLED' is set, only byte compile."
       (pcase byte-to-native-output-buffer-file
         (`(,temp-buffer . ,target-file)
          (unwind-protect
-             (byte-write-target-file temp-buffer target-file))
-         (kill-buffer temp-buffer)))
+             (byte-write-target-file temp-buffer target-file)
+           (kill-buffer temp-buffer))))
       (setq command-line-args-left (cdr command-line-args-left)))))
 
 ;;;###autoload