From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 10 Jan 2002 00:49:24 +0000 (+0000)
Subject: (fancy-splash-screens): Set tab-width in correct buffer.
X-Git-Tag: ttn-vms-21-2-B4~17235
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7df5614237dd8e3f2ed735471c2b4fe5ce40c185;p=emacs.git

(fancy-splash-screens): Set tab-width in correct buffer.
---

diff --git a/lisp/startup.el b/lisp/startup.el
index ef609e0f798..cc2de6cd516 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -1224,13 +1224,13 @@ where FACE is a valid face specification, as it can be used with
 (defun fancy-splash-screens ()
   "Display fancy splash screens when Emacs starts."
   (setq fancy-splash-help-echo (startup-echo-area-message))
-  (setq tab-width 20)
   (let ((old-hourglass display-hourglass)
 	(fancy-splash-outer-buffer (current-buffer))
 	splash-buffer
 	(old-minor-mode-map-alist minor-mode-map-alist)
 	timer)
     (switch-to-buffer "GNU Emacs")
+    (setq tab-width 20)
     (setq splash-buffer (current-buffer))
     (catch 'stop-splashing
       (unwind-protect