* startup.el (normal-splash-screen): Remove gratuitous mode-line setting (Bug#8740).

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index af88e1cbf83dc1fad8c22d508bf8b300d5250539..f6e5241de8f6d59befcc05cac8a80c4a08fd5256 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -17,6 +17,9 @@
 
        * newcomment.el (comment-end-skip): Doc fix (Bug#8659).
 
+       * startup.el (normal-splash-screen): Remove gratuitous mode-line
+       setting (Bug#8740).
+
 2011-05-28  Alp Aker  <aker@pitt.edu>  (tiny change)
 
        * buff-menu.el (Buffer-menu-revert-function, Buffer-menu-sort)

diff --git a/lisp/startup.el b/lisp/startup.el
index 6636cf944e3081bc096e38bdf3bb80ade017a2bf..26c5a469330a31e295425f681a6b796c5e45b1e0 100644 (file)
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -1739,9 +1739,6 @@ splash screen in another window."
       (erase-buffer)
       (setq default-directory command-line-default-directory)
       (set (make-local-variable 'tab-width) 8)
-      (if (not startup)
-         (set (make-local-variable 'mode-line-format)
-              (propertize "---- %b %-" 'face 'mode-line-buffer-id)))
 
       (if pure-space-overflow
          (insert pure-space-overflow-message))