(display-splash-screen): Allow a prefix argument.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3ec1f6dc1c310d90da2941a4eeda34052f051c2c..8388c7af0badd05e3faa14ff780e4c6405173cd9 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2006-09-26  Kenichi Handa  <handa@m17n.org>
+
+       * startup.el (display-splash-screen): Allow a prefix argument.
+
 2006-09-25  Jason Rumney  <jasonr@gnu.org>
 
        * subr.el (shell-quote-argument): Use DOS logic for Windows

diff --git a/lisp/startup.el b/lisp/startup.el
index cd256f2ced0639896a9c7279f479665cafd24f02..664fd285754addaa0892b70db69aae0ca139c49d 100644 (file)
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -1626,8 +1626,9 @@ Type \\[describe-distribution] for information on getting the latest version."))
 (defun display-splash-screen (&optional hide-on-input)
   "Display splash screen according to display.
 Fancy splash screens are used on graphic displays,
-normal otherwise."
-  (interactive)
+normal otherwise.
+With a prefix argument, any user input hides the splash screen."
+  (interactive "P")
   (if (use-fancy-splash-screens-p)
       (fancy-splash-screens hide-on-input)
     (normal-splash-screen hide-on-input)))