Artifact
a6597c6e9161f2f690b624fe78a8caa2aadd04e0:
Attachment "patch451200_2.txt" to
ticket [451200ffff]
added by
dkf
2001-08-16 15:35:17.
Index: tests/ioUtil.test
===================================================================
RCS file: /cvsroot/tcl/tcl/tests/ioUtil.test,v
retrieving revision 1.8
diff -r1.8 ioUtil.test
285,287c285,287
< catch [open testOpenFileChannel1%.fil r]
< catch [open testOpenFileChannel2%.fil r]
< catch [open testOpenFileChannel3%.fil r]
---
> catch {close [open testOpenFileChannel1%.fil r]}
> catch {close [open testOpenFileChannel2%.fil r]}
> catch {close [open testOpenFileChannel3%.fil r]}