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

2011-05-28 19:30:17 -04:00
parent bfbbace74b
commit fbeba6e230
2 changed files with 3 additions and 3 deletions
--- 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)
--- 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))