diff options
| author | Glenn Morris | 2011-05-28 10:47:45 -0700 |
|---|---|---|
| committer | Glenn Morris | 2011-05-28 10:47:45 -0700 |
| commit | 6a639b16edf80d8255f64e9875eebd6755f32e66 (patch) | |
| tree | 3ac202f73ddfd19f12c0d5c49874f4473d2a5b40 | |
| parent | 57f4e35d09c683681ec78104083e1b56eb403da3 (diff) | |
| download | emacs-6a639b16edf80d8255f64e9875eebd6755f32e66.tar.gz emacs-6a639b16edf80d8255f64e9875eebd6755f32e66.zip | |
* lisp/startup.el (fancy-about-screen): Use standard mode line. (Bug#8740)
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/startup.el | 6 |
2 files changed, 5 insertions, 5 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index dde6bffe7fd..3480e3a1382 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2011-05-28 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * startup.el (fancy-about-screen): Use standard mode line. (Bug#8740) | ||
| 4 | |||
| 1 | 2011-05-28 Chong Yidong <cyd@stupidchicken.com> | 5 | 2011-05-28 Chong Yidong <cyd@stupidchicken.com> |
| 2 | 6 | ||
| 3 | * help-fns.el (describe-function-1): If the function is a derived | 7 | * help-fns.el (describe-function-1): If the function is a derived |
diff --git a/lisp/startup.el b/lisp/startup.el index 14f4c7829d1..6636cf944e3 100644 --- a/lisp/startup.el +++ b/lisp/startup.el | |||
| @@ -1676,11 +1676,7 @@ splash screen in another window." | |||
| 1676 | (save-selected-window | 1676 | (save-selected-window |
| 1677 | (select-frame frame) | 1677 | (select-frame frame) |
| 1678 | (switch-to-buffer "*About GNU Emacs*") | 1678 | (switch-to-buffer "*About GNU Emacs*") |
| 1679 | (setq buffer-undo-list t | 1679 | (setq buffer-undo-list t) |
| 1680 | mode-line-format | ||
| 1681 | (concat "----" | ||
| 1682 | (propertize "%b" 'face 'mode-line-buffer-id) | ||
| 1683 | "%-")) | ||
| 1684 | (let ((inhibit-read-only t)) | 1680 | (let ((inhibit-read-only t)) |
| 1685 | (erase-buffer) | 1681 | (erase-buffer) |
| 1686 | (if pure-space-overflow | 1682 | (if pure-space-overflow |