(emerge-show-file-name): Use frame-height instead of obsolete

screen-height.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a65b9e444be17b316a5313c3b9266da7fb00c789..7a46f4ea29285aaeedb9670febc0072802827725 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2001-12-25  Pavel Jan\e,Bm\e(Bk  <Pavel@Janik.cz>
+
+       * emerge.el (emerge-show-file-name): Use frame-height instead of
+       obsolete screen-height.
+
 2001-12-25  Richard M. Stallman  <rms@gnu.org>
 
        * window.el (balance-windows): Use new PRESERVE-BEFORE arg

diff --git a/lisp/emerge.el b/lisp/emerge.el
index 68e857ff245c94001f6af1a7d7f52782170aebdc..e08e566ee2a20fa0fe6da1192219b99b00642c10 100644 (file)
--- a/lisp/emerge.el
+++ b/lisp/emerge.el
@@ -3115,7 +3115,7 @@ SPC, it is ignored; if it is anything else, it is processed as a command."
       (if (not (pos-visible-in-window-p))
          (let ((echo-keystrokes 0))
            (while (and (not (pos-visible-in-window-p))
-                       (> (1- (screen-height)) (window-height)))
+                       (> (1- (frame-height)) (window-height)))
              (enlarge-window 1))
            (let ((c (read-event)))
              (if (not (eq c 32))