diff lisp/window.el @ 32736:2f62b75a643d

(window-text-height): Don't expect minibuffers to have mode-lines.
author Miles Bader <miles@gnu.org>
date Sun, 22 Oct 2000 04:18:14 +0000
parents 7d93bad80655
children 29a87f28cd51
line wrap: on
line diff
--- a/lisp/window.el	Sat Oct 21 22:29:38 2000 +0000
+++ b/lisp/window.el	Sun Oct 22 04:18:14 2000 +0000
@@ -338,7 +338,8 @@
 value cannot be determined."
   (with-current-buffer (window-buffer window)
     (- (window-height window)
-       (if mode-line-format
+       (if (and (not (window-minibuffer-p window))
+		mode-line-format)
 	   (1+ (mode-line-window-height-fudge))
 	 0)
        (if header-line-format