diff options
| author | Richard M. Stallman <rms@gnu.org> | 1997-01-06 06:51:29 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1997-01-06 06:51:29 +0000 |
| commit | 0521db9b9a193e903addb40cd045ce2fbe7cea45 (patch) | |
| tree | 19cb1ef9bcd4b57a2f93208d2624ad66f4a900c4 | |
| parent | e8a136f7a9d74b509cac012f1a8656126472be64 (diff) | |
| download | emacs-0521db9b9a193e903addb40cd045ce2fbe7cea45.tar.gz | |
(command-line-1): Don't run buffer-menu if in batch mode.
| -rw-r--r-- | lisp/startup.el | 9 |
1 files 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." |