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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2c87d4f734e063339fdfa4f5ce1b33787b6ac375..201eb12f2f8d3be27aa35325fa2d56b022d548be 100644 (file)
--- 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 ba4d043edb3b6dad89474f848ed819aee8290e9a..432715182d2ce7b96604bbbad44efffe6dd2e4f6 100644 (file)
--- 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)