(mime-mc-gpg-encrypt-region): Bind `mc-gpg-comment' to "DUMMY".

[elisp/semi.git] / mime-play.el

diff --git a/mime-play.el b/mime-play.el
index 2e62ede..204d839 100644 (file)
--- 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,7 @@ 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 (- (window-height) height)))
        (set-window-buffer win mime-echo-buffer-name)
        (select-window win)
        ))