# HG changeset patch
# User Pavel Jan���k <Pavel@Janik.cz>
# Date 1009277963 0
# Node ID 44babbee535a567ec7dba8889ffa9f4f717cc759
# Parent  c7ffa58f963722672e4be364dd007306da1f3853
(emerge-show-file-name): Use frame-height instead of obsolete
screen-height.

diff -r c7ffa58f9637 -r 44babbee535a lisp/emerge.el
--- a/lisp/emerge.el	Tue Dec 25 10:55:12 2001 +0000
+++ b/lisp/emerge.el	Tue Dec 25 10:59:23 2001 +0000
@@ -3115,7 +3115,7 @@
       (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))