From 0521db9b9a193e903addb40cd045ce2fbe7cea45 Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Mon, 6 Jan 1997 06:51:29 +0000
Subject: (command-line-1): Don't run buffer-menu if in batch mode.

---
 lisp/startup.el | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/lisp/startup.el b/lisp/startup.el
index 9aceed403ea..68f857cde74 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -947,10 +947,11 @@ Type \\[describe-distribution] for information on getting the latest version."))
 			 (setq line 0))))))))
       ;; If 3 or more files visited, and not all visible,
       ;; show user what they all are.
-      (if (> file-count 2)
-	  (or (get-buffer-window first-file-buffer)
-	      (progn (other-window 1)
-		     (buffer-menu)))))))
+      (and (> file-count 2)
+	   (not noninteractive)
+	   (or (get-buffer-window first-file-buffer)
+	       (progn (other-window 1)
+		      (buffer-menu)))))))
 
 (defun command-line-normalize-file-name (file)
   "Collapse multiple slashes to one, to handle non-Emacs file names."
-- 
cgit v1.2.1