Mercurial > emacs
changeset 61321:537477e02afd
(command-line-1): Display startup-echo-area-message when fancy splash
screen is in use.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Tue, 05 Apr 2005 15:19:35 +0000 |
| parents | b954dddcb7b0 |
| children | 8ac9a1a8591f |
| files | lisp/startup.el |
| diffstat | 1 files changed, 4 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/startup.el Tue Apr 05 15:19:00 2005 +0000 +++ b/lisp/startup.el Tue Apr 05 15:19:35 2005 +0000 @@ -1481,9 +1481,10 @@ nil t)) (error nil)) (kill-buffer buffer))))) - ;; Stop any "Loading image..." message hiding echo-area-message. - (use-fancy-splash-screens-p) - (display-startup-echo-area-message)) + (progn + ;; Stop any "Loading image..." message hiding echo-area-message. + (use-fancy-splash-screens-p) + (display-startup-echo-area-message))) ;; Delay 2 seconds after an init file error message ;; was displayed, so user can read it.