sit-for considered harmful in kbd-macros

[Stefan Monnier]

How about short-circuiting sit-for when called from a kbd-macro,
as if input was pending ?


        Stefan


Index: dispnew.c
===================================================================
RCS file: /cvsroot/emacs/emacs/src/dispnew.c,v
retrieving revision 1.300
diff -u -u -b -r1.300 dispnew.c
--- dispnew.c   19 Jan 2002 13:54:57 -0000      1.300
+++ dispnew.c   6 Feb 2002 22:38:46 -0000
@@ -6175,7 +6175,7 @@
 
   swallow_events (display);
 
-  if (detect_input_pending_run_timers (display))
+  if (detect_input_pending_run_timers (display) || !NILP (Vexecuting_macro))
     return Qnil;
 
   if (initial_display)