From: Gerd Moellmann <gerd@gnu.org>
Date: Wed, 18 Oct 2000 14:27:55 +0000 (+0000)
Subject: (fancy-splash-screens): Use fancy-splash-delay.
X-Git-Tag: emacs-pretest-21.0.90~778
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=dada41e12c4bcaa10d09a88294715d78652c95d6;p=emacs.git

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

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)