changeset 39556:c12d72aa46b9

(inhibit-startup-buffer-menu): New user-option. (command-line-1): If inhibit-startup-buffer-menu is set, don't display the buffer menu. From Simon Josefsson <jas@extundo.com>.
author Gerd Moellmann <gerd@gnu.org>
date Fri, 05 Oct 2001 09:24:51 +0000
parents 8f03c11f64ef
children fb85410efef7
files lisp/startup.el
diffstat 1 files changed, 6 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/startup.el	Fri Oct 05 09:24:20 2001 +0000
+++ b/lisp/startup.el	Fri Oct 05 09:24:51 2001 +0000
@@ -155,6 +155,11 @@
   :type 'boolean
   :group 'initialization)
 
+(defcustom inhibit-startup-buffer-menu nil
+  "*Non-nil inhibits display of buffer list when more than 2 files are loaded."
+  :type 'boolean
+  :group 'initialization)
+
 (defvar command-switch-alist nil
   "Alist of command-line switches.
 Elements look like (SWITCH-STRING . HANDLER-FUNCTION).
@@ -1621,6 +1626,7 @@
       ;; show user what they all are.  But leave the last one current.
       (and (> file-count 2)
 	   (not noninteractive)
+	   (not inhibit-startup-buffer-menu)	   
 	   (or (get-buffer-window first-file-buffer)
 	       (list-buffers))))))