diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-03-18 13:20:47 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-03-18 13:20:47 (GMT) |
commit | 5020e782733e9aba5aafca68dd35051b5f80da7e (patch) | |
tree | c0a56c5b08444c8d0578589c44787c631d6e0307 | |
parent | e01a116dd66013ef4d031ee63666874f4262a115 (diff) | |
download | tcl-5020e782733e9aba5aafca68dd35051b5f80da7e.zip tcl-5020e782733e9aba5aafca68dd35051b5f80da7e.tar.gz tcl-5020e782733e9aba5aafca68dd35051b5f80da7e.tar.bz2 |
Suggested fix for [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"); |