From: Gerd Moellmann <gerd@gnu.org>
Date: Wed, 13 Dec 2000 14:24:01 +0000 (+0000)
Subject: (update_window): If do_mouse_tracking is non-nil,
X-Git-Tag: emacs-pretest-21.0.95~565
X-Git-Url: https://code.delx.au/gnu-emacs/commitdiff_plain/8fd9a6667c27c75c92ce4ebaafe247a5a6751835

(update_window): If do_mouse_tracking is non-nil,
don't interrupt the update for pending input initially, i.e.
update at least some lines.
---

diff --git a/src/dispnew.c b/src/dispnew.c
index 30db7dda29..7694233e36 100644
--- a/src/dispnew.c
+++ b/src/dispnew.c
@@ -3766,6 +3766,7 @@ update_window (w, force_p)
   int paused_p;
   int preempt_count = baud_rate / 2400 + 1;
   extern int input_pending;
+  extern Lisp_Object do_mouse_tracking;
 #if GLYPH_DEBUG
   struct frame *f = XFRAME (WINDOW_FRAME (w));
   extern struct frame *updating_frame;
@@ -3783,7 +3784,7 @@ update_window (w, force_p)
 
   /* If forced to complete the update, or if no input is pending, do
      the update.  */
-  if (force_p || !input_pending)
+  if (force_p || !input_pending || !NILP (do_mouse_tracking))
     {
       struct glyph_row *row, *end;
       struct glyph_row *mode_line_row;