* 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:
parent
777b383dd0
commit
e59216d3be
1 changed files with 2 additions and 2 deletions
|
@ -3716,7 +3716,7 @@ Prepare every function for final compilation and drive the C back-end."
|
||||||
(if (zerop
|
(if (zerop
|
||||||
(call-process (expand-file-name invocation-name
|
(call-process (expand-file-name invocation-name
|
||||||
invocation-directory)
|
invocation-directory)
|
||||||
nil t t "-no-comp-spawn" "--batch" "-l"
|
nil t t "-no-comp-spawn" "-Q" "--batch" "-l"
|
||||||
temp-file))
|
temp-file))
|
||||||
(progn
|
(progn
|
||||||
(delete-file temp-file)
|
(delete-file temp-file)
|
||||||
|
@ -4005,7 +4005,7 @@ display a message."
|
||||||
:command (list
|
:command (list
|
||||||
(expand-file-name invocation-name
|
(expand-file-name invocation-name
|
||||||
invocation-directory)
|
invocation-directory)
|
||||||
"-no-comp-spawn" "--batch"
|
"-no-comp-spawn" "-Q" "--batch"
|
||||||
"--eval"
|
"--eval"
|
||||||
;; Suppress Abort dialogs on MS-Windows
|
;; Suppress Abort dialogs on MS-Windows
|
||||||
"(setq w32-disable-abort-dialog t)"
|
"(setq w32-disable-abort-dialog t)"
|
||||||
|
|
Loading…
Add table
Reference in a new issue