summaryrefslogtreecommitdiff
path: root/lisp/startup.el
diff options
context:
space:
mode:
authorAndrea Corallo <andrea.corallo@arm.com>2022-10-18 15:14:32 +0200
committerAndrea Corallo <andrea.corallo@arm.com>2022-10-26 08:30:09 +0200
commit5ad5b797f78dacb9c901d3c63bee05b1762fa94f (patch)
treed84a40613a79c7e960bd032ed33d7492e7d48850 /lisp/startup.el
parentd062482c3f9c243e3224d9de0d776be05c54926b (diff)
downloademacs-5ad5b797f78dacb9c901d3c63bee05b1762fa94f.tar.gz
Set `comp-no-spawn' earlier using -no-comp-spawn
* src/emacs.c (standard_args): Add '-no-comp-spawn' cmd line option. * lisp/startup.el (command-line): Parse '-no-comp-spawn' cmd line option. * lisp/emacs-lisp/comp.el (comp-run-async-workers, comp-final): Use '-no-comp-spawn'.
Diffstat (limited to 'lisp/startup.el')
-rw-r--r--lisp/startup.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/startup.el b/lisp/startup.el
index 725984b815b..70267fc857d 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -1198,7 +1198,7 @@ please check its value")
("--user") ("--iconic") ("--icon-type") ("--quick")
("--no-blinking-cursor") ("--basic-display")
("--dump-file") ("--temacs") ("--seccomp")
- ("--init-directory")))
+ ("--init-directory" "--no-comp-spawn")))
(argi (pop args))
(orig-argi argi)
argval)
@@ -1255,6 +1255,9 @@ please check its value")
((equal argi "-no-site-file")
(setq site-run-file nil)
(put 'site-run-file 'standard-value '(nil)))
+ ((equal argi "-no-comp-spawn")
+ (defvar comp-no-spawn)
+ (setq comp-no-spawn t))
((equal argi "-debug-init")
(setq init-file-debug t))
((equal argi "-iconic")