changeset 32616:21ca5e42d4f6

(fancy-splash-screens): Set buffer-undo-list to t.
author Gerd Moellmann <gerd@gnu.org>
date Wed, 18 Oct 2000 14:23:10 +0000
parents 5f6178a60e6b
children 5bc952938b50
files lisp/startup.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/startup.el	Wed Oct 18 14:20:53 2000 +0000
+++ b/lisp/startup.el	Wed Oct 18 14:23:10 2000 +0000
@@ -1014,13 +1014,13 @@
 	  (define-key map [mouse-movement] 'ignore)
 	  (setq cursor-type nil
 		display-busy-cursor nil
+		buffer-undo-list t
 		mode-line-format
 		(propertize "---- %b %-" 'face '(:weight bold))
 		timer (run-with-timer 0 5 #'fancy-splash-screens-1
 				      splash-buffer))
 	  (recursive-edit))
       (cancel-timer timer)
-      (remove-hook 'pre-command-hook 'fancy-splash-pre-command)
       (setq display-busy-cursor old-busy-cursor)
       (kill-buffer splash-buffer))))