diff options
author | andreas_kupries <akupries@shaw.ca> | 2008-04-07 22:49:18 (GMT) |
---|---|---|
committer | andreas_kupries <akupries@shaw.ca> | 2008-04-07 22:49:18 (GMT) |
commit | 020b89adf6c1706fd36722233e8acb5eb7c8d032 (patch) | |
tree | 88d88b6465453233ce1fa00e9a787d75891e0c61 /tests/chanio.test | |
parent | 58cdf9a29789c2ea52ed2b5999be5638c6213498 (diff) | |
download | tcl-020b89adf6c1706fd36722233e8acb5eb7c8d032.zip tcl-020b89adf6c1706fd36722233e8acb5eb7c8d032.tar.gz tcl-020b89adf6c1706fd36722233e8acb5eb7c8d032.tar.bz2 |
Corrected test name.
Diffstat (limited to 'tests/chanio.test')
-rw-r--r-- | tests/chanio.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/chanio.test b/tests/chanio.test index 7580d30..b4287f5 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.3.2.4 2008/04/07 22:33:30 andreas_kupries Exp $ +# RCS: @(#) $Id: chanio.test,v 1.3.2.5 2008/04/07 22:49:18 andreas_kupries Exp $ if {[catch {package require tcltest 2}]} { chan puts stderr "Skipping tests in [info script]. tcltest 2 required." @@ -6982,7 +6982,7 @@ test chan-io-53.9 {CopyData: -size and event interaction, Bug 780533} -setup { catch {removeFile err} catch {unset ::forever} } -result OK -test io-53.10 {Bug 1350564, multi-directional fcopy} -setup { +test chan-io-53.10 {Bug 1350564, multi-directional fcopy} -setup { set err [makeFile {} err] set pipe [open "|[info nameofexecutable] 2> $err" r+] chan configure $pipe -translation binary -buffering line |