* startup.el (fancy-splash-screens): Don't switch to the scratch

	buffer; it may not be the next buffer.

2 files changed, 6 insertions, 5 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 1a4706d3f64..4d8a9d99fe5 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2006-09-16  Chong Yidong  <cyd@stupidchicken.com>
+
+        * startup.el (fancy-splash-screens): Don't switch to the scratch
+        buffer; it may not be the next buffer.
+
 2006-09-16  Romain Francoise  <romain@orebokech.com>
 
         * saveplace.el (load-save-place-alist-from-file): Use expanded name
diff --git a/lisp/startup.el b/lisp/startup.el
index c3d0fc1a765..8ac1cef5237 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -1383,11 +1383,7 @@ mouse."
               (setq display-hourglass old-hourglass
                     minor-mode-map-alist old-minor-mode-map-alist
                     emulation-mode-map-alists old-emulation-mode-map-alists)
-              (use-local-map nil)
-              (switch-to-buffer "*scratch*")
-;;;  Comment out the next line in order to see the splash buffer exactly as it was.
-              (kill-buffer splash-buffer)
-              ))))
+              (kill-buffer splash-buffer)))))
     ;; If hide-on-input is nil, don't hide the buffer on input.
     (if (or (window-minibuffer-p)
             (window-dedicated-p (selected-window)))