From dada41e12c4bcaa10d09a88294715d78652c95d6 Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Wed, 18 Oct 2000 14:27:55 +0000 Subject: [PATCH] (fancy-splash-screens): Use fancy-splash-delay. --- lisp/ChangeLog | 7 ++++++- lisp/startup.el | 3 ++- 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 + + * startup.el (fancy-splash-screens): Set buffer-undo-list to t. + Use fancy-splash-delay. + 2000-10-18 Miles Bader * 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 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) -- 2.39.5