From: Gerd Moellmann <gerd@gnu.org>
Date: Thu, 28 Dec 2000 12:19:58 +0000 (+0000)
Subject: (echo_area_display): Bind redisplay-dont-pause to t
X-Git-Tag: emacs-pretest-21.0.95~252
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c06017fbd01336c22d89e645dd953e987d24b5fe;p=emacs.git

(echo_area_display): Bind redisplay-dont-pause to t
around the call to redisplay_internal.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index 8563a8fdbe2..8e5fdb97d26 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,8 @@
 2000-12-28  Gerd Moellmann  <gerd@gnu.org>
 
+	* xdisp.c (echo_area_display): Bind redisplay-dont-pause to t
+	around the call to redisplay_internal.
+
 	* xfns.c: Use #if GLYPH_DEBUG instead of #ifdef GLYPH_DEBUG.
 
 	* dispnew.c: Use #if GLYPH_DEBUG instead of #ifdef GLYPH_DEBUG.
diff --git a/src/xdisp.c b/src/xdisp.c
index 708c5f170cb..6127fe4e00a 100644
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -6698,9 +6698,14 @@ echo_area_display (update_frame_p)
 	    
 	  if (window_height_changed_p)
 	    {
-	      /* Must update other windows.  */
+	      /* Must update other windows.  Likewise as in other
+		 cases, don't let this update be interrupted by
+		 pending input.  */
+	      int count = BINDING_STACK_SIZE ();
+	      specbind (Qredisplay_dont_pause, Qt);
 	      windows_or_buffers_changed = 1;
 	      redisplay_internal (0);
+	      unbind_to (count, Qnil);
 	    }
 	  else if (FRAME_WINDOW_P (f) && n == 0)
 	    {