# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 829017675 0
# Node ID 9938201005a3e910a4c4106091fda6242b034728
# Parent  6ac4f300f9b4e294166b876895e9ea2ca9e69afe
(sit_for): Call swallow_events.

diff -r 6ac4f300f9b4 -r 9938201005a3 src/dispnew.c
--- a/src/dispnew.c	Mon Apr 08 23:12:25 1996 +0000
+++ b/src/dispnew.c	Tue Apr 09 02:41:15 1996 +0000
@@ -2367,6 +2367,8 @@
 {
   Lisp_Object read_kbd;
 
+  swallow_events (display);
+
   if (detect_input_pending_run_timers (display))
     return Qnil;