From 4917dcb254037966dbfbd118cf09128ca14af404 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Wed, 8 Sep 1999 05:16:19 +0000 Subject: [PATCH] (mime-show-echo-buffer): Rewrite. --- mime-play.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/mime-play.el b/mime-play.el index 2e62ede..0497016 100644 --- a/mime-play.el +++ b/mime-play.el @@ -399,6 +399,7 @@ this function is called." (height (if (functionp mime-echo-window-height) (funcall mime-echo-window-height) mime-echo-window-height)) + (window-min-height 1) start) (if win (progn @@ -413,9 +414,8 @@ this function is called." (error nil))) (select-window (get-buffer-window (or mime-preview-buffer (current-buffer)))) - (let ((window-min-height 1)) - (setq win (split-window-vertically (- (window-height) height))) - ) + (setq win + (split-window-vertically (min -2 (- (window-height) height)))) (set-window-buffer win mime-echo-buffer-name) (select-window win) )) -- 1.7.10.4