Splash screen on tty

[Håkan Granath]

Hi

One minor cosmetic problem in Emacs 21.1 is the following: If emacs is
started on a tty with font lock enabled, then the initial help message
is fontified as elisp.

The following patch is one way to fix this (which seems to work for
me, but maybe is not The Right Thing ;-)

/Håkan Granath



*** lisp/startup.el.bak Fri Nov  2 11:48:20 2001
--- lisp/startup.el     Fri Nov  2 11:59:32 2001
***************
*** 1305,1310 ****
--- 1305,1311 ----
                     (wait-for-input t))
                 (unwind-protect
                     (when (not (input-pending-p))
+                        (switch-to-buffer "GNU Emacs")
                       (goto-char (point-max))
                       ;; The convention for this piece of code is that
                       ;; each piece of output starts with one or two newlines
***************
*** 1423,1428 ****
--- 1424,1430 ----
                       (when wait-for-input
                         (sit-for 120)))
                   
+                    (kill-buffer (get-buffer "GNU Emacs"))
                   (with-current-buffer (get-buffer "*scratch*")
                     (erase-buffer)
                     (when initial-scratch-message