diff options
author | dgp <dgp@users.sourceforge.net> | 2023-03-17 14:22:44 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2023-03-17 14:22:44 (GMT) |
commit | 13b1529c7b6f4da55532170ee08ac047581b6300 (patch) | |
tree | ea29c9975e7e072bd474f32c093b08eb40c1d759 | |
parent | 87b64566847ce5fda7292ec8b2d2de3739e7e680 (diff) | |
download | tcl-13b1529c7b6f4da55532170ee08ac047581b6300.zip tcl-13b1529c7b6f4da55532170ee08ac047581b6300.tar.gz tcl-13b1529c7b6f4da55532170ee08ac047581b6300.tar.bz2 |
Clean up after events to avoid errors in later tests that use an event loop.
-rw-r--r-- | tests/ioTrans.test | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/ioTrans.test b/tests/ioTrans.test index 3a23e61..44e7d64 100644 --- a/tests/ioTrans.test +++ b/tests/ioTrans.test @@ -643,6 +643,9 @@ namespace eval reflector { proc finalize {_ chan} { + foreach id [after info] { + after cancel $id + } namespace delete $_ } |