summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorEli Zaretskii <eliz@gnu.org>2022-12-17 20:35:11 +0200
committerEli Zaretskii <eliz@gnu.org>2022-12-17 20:35:11 +0200
commit5a245bc786e2c07907936ff022c675a50ed7978c (patch)
tree35dd6d62e8a84591130e044cf45309b76b267adf /lisp/emacs-lisp
parent4d1e4a48938be8a08e294b4a5711a2c8ce941a5a (diff)
downloademacs-5a245bc786e2c07907936ff022c675a50ed7978c.tar.gz
emacs-5a245bc786e2c07907936ff022c675a50ed7978c.tar.bz2
emacs-5a245bc786e2c07907936ff022c675a50ed7978c.zip
Prevent Abort dialogs from async-compiling jobs on Windows
* lisp/emacs-lisp/comp.el (comp-run-async-workers): Disable Abort dialog popping in the sub-processes that perform async compilation, by passing w32-disable-abort-dialog=t on their command line.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/comp.el7
1 files changed, 5 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index 7b562aaa53d..2c306d892c7 100644
--- a/lisp/emacs-lisp/comp.el
+++ b/lisp/emacs-lisp/comp.el
@@ -4005,8 +4005,11 @@ display a message."
:command (list
(expand-file-name invocation-name
invocation-directory)
- "-no-comp-spawn" "--batch" "-l"
- temp-file)
+ "-no-comp-spawn" "--batch"
+ "--eval"
+ ;; Suppress Abort dialogs on MS-Windows
+ "(setq w32-disable-abort-dialog t)"
+ "-l" temp-file)
:sentinel
(lambda (process _event)
(run-hook-with-args