* Invoke spawed Emacs processes with '-Q' when native compiling (bug#60208)

* lisp/emacs-lisp/comp.el (comp-final): Invoke spawned Emacs with '-Q'.
(comp-run-async-workers): Likewise.
This commit is contained in:
Andrea Corallo 2022-12-21 23:26:52 +01:00
parent 777b383dd0
commit e59216d3be

View file

@ -3716,7 +3716,7 @@ Prepare every function for final compilation and drive the C back-end."
(if (zerop
(call-process (expand-file-name invocation-name
invocation-directory)
nil t t "-no-comp-spawn" "--batch" "-l"
nil t t "-no-comp-spawn" "-Q" "--batch" "-l"
temp-file))
(progn
(delete-file temp-file)
@ -4005,7 +4005,7 @@ display a message."
:command (list
(expand-file-name invocation-name
invocation-directory)
"-no-comp-spawn" "--batch"
"-no-comp-spawn" "-Q" "--batch"
"--eval"
;; Suppress Abort dialogs on MS-Windows
"(setq w32-disable-abort-dialog t)"