diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-03-19 14:55:25 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-03-19 14:55:25 (GMT) |
| commit | 4e90ccc6db032c546939cdcdfa33fcecd7122dce (patch) | |
| tree | 37371a0a190d0c27cb3e66d0c597a39673c6a2f0 | |
| parent | d5479489aab71c267a1371d2ac1d0674a15a0c61 (diff) | |
| parent | 2b7eb65f53e75a84e02c3b5da96c45bbefc6ff8a (diff) | |
| download | tcl-4e90ccc6db032c546939cdcdfa33fcecd7122dce.zip tcl-4e90ccc6db032c546939cdcdfa33fcecd7122dce.tar.gz tcl-4e90ccc6db032c546939cdcdfa33fcecd7122dce.tar.bz2 | |
Fix [0221b993a1]: Tcl command [update idletasks] doesn't skip main loop in Tcl_DoOneEvent
| -rw-r--r-- | generic/tclEvent.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclEvent.c b/generic/tclEvent.c index bf3be38..52cd351 100644 --- a/generic/tclEvent.c +++ b/generic/tclEvent.c @@ -1513,7 +1513,7 @@ Tcl_UpdateObjCmd( } switch ((enum updateOptionsEnum) optionIndex) { case OPT_IDLETASKS: - flags = TCL_WINDOW_EVENTS|TCL_IDLE_EVENTS|TCL_DONT_WAIT; + flags = TCL_IDLE_EVENTS|TCL_DONT_WAIT; break; default: Tcl_Panic("Tcl_UpdateObjCmd: bad option index to UpdateOptions"); |