# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1159231895 0
# Node ID 5cb689e83be202a2ad42beaa9d63e3df302e55e0
# Parent  c637565b16e8df89388ad07e903409fe2af6c364
(display-splash-screen): Allow a prefix argument.

diff -r c637565b16e8 -r 5cb689e83be2 lisp/startup.el
--- a/lisp/startup.el	Mon Sep 25 23:03:39 2006 +0000
+++ b/lisp/startup.el	Tue Sep 26 00:51:35 2006 +0000
@@ -1626,8 +1626,9 @@
 (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)))