(safe-functions): Add defvar.

[gnu-emacs] / lisp / startup.el

diff --git a/lisp/startup.el b/lisp/startup.el
index 8dac582e452e7d71515beac63ca176df5412aebd..32021225e7e5aac139f6f25260a381867f97130e 100644 (file)
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -1724,11 +1724,7 @@ normal otherwise."
   ;; Maybe display a startup screen.
   (unless (or inhibit-startup-message
              noninteractive
-             emacs-quick-startup
-            ;; Don't display startup screen if init file
-            ;; has started some sort of server.
-            (and (fboundp 'process-list)
-                 (process-list)))
+             emacs-quick-startup)
     ;; Display a startup screen, after some preparations.
 
     ;; If there are no switches to process, we might as well