From 595a4941c581d30aaa736136591e8d2d26678d85 Mon Sep 17 00:00:00 2001
From: Philipp Stephani
Date: Tue, 29 Sep 2026 00:41:59 +0200
Subject: [PATCH] Disable interaction for a few of the batch-only tools
---
elisp/private/tools/compile.el | 5 +++--
elisp/private/tools/export-org.el | 3 ++-
elisp/private/tools/gen-proto.el | 1 +
elisp/private/tools/run-tst.el | 1 +
tests/proto/integration/cat.el | 1 +
5 files changed, 8 insertions(+), 3 deletions(-)
diff --git a/elisp/private/tools/compile.el b/elisp/private/tools/compile.el
index 1e89f4f35..4f9593136 100644
--- a/elisp/private/tools/compile.el
+++ b/elisp/private/tools/compile.el
@@ -1,6 +1,6 @@
;;; compile.el --- byte-compile Emacs Lisp files -*- lexical-binding: t; -*-
-;; Copyright 2020-2025 Google LLC
+;; Copyright 2020-2026 Google LLC
;;
;; Licensed under the Apache License, Version 2.0 (the "License");
;; you may not use this file except in compliance with the License.
@@ -36,7 +36,8 @@
;; Leaving these enabled leads to undefined behavior and doesn’t make sense in
;; batch mode.
(setq attempt-stack-overflow-recovery nil
- attempt-orderly-shutdown-on-fatal-signal nil)
+ attempt-orderly-shutdown-on-fatal-signal nil
+ inhibit-interaction t)
;; Ensure filenames in the output are relative to the current directory.
(setq byte-compile-root-dir
diff --git a/elisp/private/tools/export-org.el b/elisp/private/tools/export-org.el
index c8042ccd6..18f2f7e1f 100644
--- a/elisp/private/tools/export-org.el
+++ b/elisp/private/tools/export-org.el
@@ -1,6 +1,6 @@
;;; export-org.el --- export Org-mode file to Texinfo manual -*- lexical-binding: t; -*-
-;; Copyright 2021-2025 Google LLC
+;; Copyright 2021-2026 Google LLC
;;
;; Licensed under the Apache License, Version 2.0 (the "License");
;; you may not use this file except in compliance with the License.
@@ -45,6 +45,7 @@
(after-insert-file-functions nil)
(write-region-annotate-functions nil)
(write-region-post-annotation-function nil)
+ (inhibit-interaction t)
(org-export-coding-system 'utf-8-unix)
(org-export-time-stamp-file nil)
(org-export-use-babel nil))
diff --git a/elisp/private/tools/gen-proto.el b/elisp/private/tools/gen-proto.el
index 81dc9b7e5..d2438a7d3 100644
--- a/elisp/private/tools/gen-proto.el
+++ b/elisp/private/tools/gen-proto.el
@@ -170,6 +170,7 @@ enumeration type, and VALUES is a list of (NAME NUMBER) pairs."
(set-binary-mode 'stdin :binary)
(set-binary-mode 'stdout :binary)
(let* ((standard-output #'external-debugging-output)
+ (inhibit-interaction t)
(inhibit-modification-hooks t)
(stdin (with-temp-buffer
(set-buffer-multibyte nil)
diff --git a/elisp/private/tools/run-tst.el b/elisp/private/tools/run-tst.el
index 863b94416..0ec39b4c0 100644
--- a/elisp/private/tools/run-tst.el
+++ b/elisp/private/tools/run-tst.el
@@ -944,6 +944,7 @@ exact copies as equal."
(setq attempt-stack-overflow-recovery nil
attempt-orderly-shutdown-on-fatal-signal nil
+ inhibit-interaction t
edebug-initial-mode 'Go-nonstop) ; ‘step’ doesn’t work in batch mode
;; We perform our own coverage instrumentation.
diff --git a/tests/proto/integration/cat.el b/tests/proto/integration/cat.el
index da5517e42..32221ee83 100644
--- a/tests/proto/integration/cat.el
+++ b/tests/proto/integration/cat.el
@@ -33,6 +33,7 @@
(let ((file-name-handler-alist ())
(coding-system-for-read 'no-conversion)
(coding-system-for-write 'no-conversion)
+ (inhibit-interaction t)
(inhibit-modification-hooks t)
(write-region-annotate-functions nil)
(write-region-post-annotation-function nil))