From 15fa6db0df6c391a9b2935229a2631a83c32f314 Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Fri, 26 Jan 2001 11:38:23 +0000 Subject: [PATCH] (display-startup-echo-area-message): Make sure the echo area is resized to fit the size of the startup message. --- lisp/ChangeLog | 4 ++++ lisp/startup.el | 3 ++- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index f1bbcf4f59a..b216d079920 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,9 @@ 2001-01-26 Gerd Moellmann + * startup.el (display-startup-echo-area-message): Make sure + the echo area is resized to fit the size of the startup + message. + * gud.el (gud-perldb-massage-args): Avoid nreverse'ing a list part of which is a constant. diff --git a/lisp/startup.el b/lisp/startup.el index d11b9945b0f..65ceb28d22b 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -1207,7 +1207,8 @@ where FACE is a valid face specification, as it can be used with (defun display-startup-echo-area-message () - (message (startup-echo-area-message))) + (let ((resize-mini-windows t)) + (message (startup-echo-area-message)))) (defun command-line-1 (command-line-args-left) -- 2.11.4.GIT