diff options
| -rw-r--r-- | tests/chanio.test | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/chanio.test b/tests/chanio.test index 6e44c38..14a1554 100644 --- a/tests/chanio.test +++ b/tests/chanio.test @@ -13,7 +13,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: chanio.test,v 1.13 2008/05/23 21:00:45 andreas_kupries Exp $ +# RCS: @(#) $Id: chanio.test,v 1.14 2008/06/12 09:46:52 das Exp $ if {[catch {package require tcltest 2}]} { chan puts stderr "Skipping tests in [info script]. tcltest 2 required." @@ -7057,6 +7057,7 @@ test chan-io-53.9 {CopyData: -size and event interaction, Bug 780533} -setup { rename ::done {} after 1000; # Allow Windows time to figure out that the # process is gone + catch {close $out} catch {removeFile out} catch {removeFile err} catch {unset ::forever} |