(fancy-splash-screens): Use fancy-splash-delay.

2 files changed, 8 insertions, 2 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2c87d4f734e..201eb12f2f8 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2000-10-18  Gerd Moellmann  <gerd@gnu.org>
+
+        * startup.el (fancy-splash-screens): Set buffer-undo-list to t.
+        Use fancy-splash-delay.
+
 2000-10-18  Miles Bader  <miles@gnu.org>
 
         * comint.el (comint-delete-output): Renamed from `comint-kill-output'.
@@ -61,7 +66,7 @@
 
         * info.el (Info-title-1-face, Info-title-2-face)
         (Info-title-3-face): Define colors for tty's.
-        (info-header-node): Remove unneded tty-specific definition.
+        (info-header-node): Remove unneeded tty-specific definition.
 
 2000-10-16  Eli Zaretskii  <eliz@is.elta.co.il>
 
diff --git a/lisp/startup.el b/lisp/startup.el
index ba4d043edb3..432715182d2 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -1017,7 +1017,8 @@ where FACE is a valid face specification, as it can be used with
                 buffer-undo-list t
                 mode-line-format
                 (propertize "---- %b %-" 'face '(:weight bold))
-                timer (run-with-timer 0 5 #'fancy-splash-screens-1
+                timer (run-with-timer 0 fancy-splash-delay
+                                      #'fancy-splash-screens-1
                                       splash-buffer))
           (recursive-edit))
       (cancel-timer timer)