From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 20 Jan 1998 04:56:52 +0000 (+0000)
Subject: (momentary-string-display): Fix backward test
X-Git-Tag: emacs-20.3~2387
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=97d26a9743d89e18f30624ec7fb7fadcf5b45c77;p=emacs.git

(momentary-string-display): Fix backward test
for whether end of message is off the screen.
---

diff --git a/lisp/subr.el b/lisp/subr.el
index 683c8e291b2..d344754c34b 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -809,7 +809,7 @@ If MESSAGE is nil, instructions to type EXIT-CHAR are displayed there."
 	    (insert-before-markers string)
 	    (setq insert-end (point))
 	    ;; If the message end is off screen, recenter now.
-	    (if (> (window-end) insert-end)
+	    (if (< (window-end) insert-end)
 		(recenter (/ (window-height) 2)))
 	    ;; If that pushed message start off the screen,
 	    ;; scroll to start it at the top of the screen.