diff options
| -rw-r--r-- | tests/ioCmd.test | 18 |
1 files changed, 3 insertions, 15 deletions
diff --git a/tests/ioCmd.test b/tests/ioCmd.test index 79d6c7c..bb05cde 100644 --- a/tests/ioCmd.test +++ b/tests/ioCmd.test @@ -12,7 +12,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: ioCmd.test,v 1.10 2001/09/13 19:07:18 andreas_kupries Exp $ +# RCS: @(#) $Id: ioCmd.test,v 1.11 2001/10/12 19:45:24 hobbs Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest @@ -531,24 +531,12 @@ close $wfile # cleanup foreach file [list test1 test2 test3 test4] { - ::tcltest::removeFile $file + catch {::tcltest::removeFile $file} } # delay long enough for background processes to finish after 500 foreach file [list test5 pipe output] { - ::tcltest::removeFile $file + catch {::tcltest::removeFile $file} } ::tcltest::cleanupTests return - - - - - - - - - - - - |