From 97d26a9743d89e18f30624ec7fb7fadcf5b45c77 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 20 Jan 1998 04:56:52 +0000 Subject: [PATCH] (momentary-string-display): Fix backward test for whether end of message is off the screen. --- lisp/subr.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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. -- 2.39.2