# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 971878990 0
# Node ID 21ca5e42d4f63e62adc4190dd78f38cee832c117
# Parent  5f6178a60e6bed51ca52d00b7314ff65c437f0e2
(fancy-splash-screens): Set buffer-undo-list to t.

diff -r 5f6178a60e6b -r 21ca5e42d4f6 lisp/startup.el
--- 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))))