* Fix `batch-byte+native-compile' target directory.

* lisp/emacs-lisp/comp.el (batch-native-compile): Don't shadow
`native-compile-target-directory' unless necessary.
This commit is contained in:
Andrea Corallo 2023-08-12 18:42:33 +02:00
parent 8dbd5aa1ee
commit 842dbf500e

View file

@ -4305,8 +4305,9 @@ last directory in `native-comp-eln-load-path')."
(comp-ensure-native-compiler) (comp-ensure-native-compiler)
(let ((comp-running-batch-compilation t) (let ((comp-running-batch-compilation t)
(native-compile-target-directory (native-compile-target-directory
(if for-tarball (if for-tarball
(car (last native-comp-eln-load-path))))) (car (last native-comp-eln-load-path))
native-compile-target-directory)))
(cl-loop for file in command-line-args-left (cl-loop for file in command-line-args-left
if (or (null byte+native-compile) if (or (null byte+native-compile)
(cl-notany (lambda (re) (string-match re file)) (cl-notany (lambda (re) (string-match re file))