From: Eli Zaretskii <eliz@gnu.org>
Date: Sat, 17 Dec 2022 18:35:11 +0000 (+0200)
Subject: Prevent Abort dialogs from async-compiling jobs on Windows
X-Git-Tag: emacs-29.0.90~1105
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5a245bc786e2c07907936ff022c675a50ed7978c;p=emacs.git

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.
---

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