summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2014-05-14 09:11:42 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2014-05-14 09:11:42 (GMT)
commit5e610145644e54a301c3f508b6c6fb4dcf95f7b6 (patch)
treeb6993c63f6d8bac702953f07af200f51fd505f45
parentb482771754f287160a211cfe25fb24e135b52101 (diff)
downloadtcl-5e610145644e54a301c3f508b6c6fb4dcf95f7b6.zip
tcl-5e610145644e54a301c3f508b6c6fb4dcf95f7b6.tar.gz
tcl-5e610145644e54a301c3f508b6c6fb4dcf95f7b6.tar.bz2
Fix 3 test-cases which started failing on Windows
-rw-r--r--tests/io.test3
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/io.test b/tests/io.test
index f692e43..b99c4e9 100644
--- a/tests/io.test
+++ b/tests/io.test
@@ -6825,6 +6825,7 @@ test io-52.12 {coverage of -translation auto} {
set in [open $path(test1)]
chan configure $in -buffersize 8
set out [open $path(test2) w]
+ chan configure $out -translation lf
fcopy $in $out
close $in
close $out
@@ -6839,6 +6840,7 @@ test io-52.13 {coverage of -translation cr} {
set in [open $path(test1)]
chan configure $in -buffersize 8 -translation cr
set out [open $path(test2) w]
+ chan configure $out -translation lf
fcopy $in $out
close $in
close $out
@@ -6853,6 +6855,7 @@ test io-52.14 {coverage of -translation crlf} {
set in [open $path(test1)]
chan configure $in -buffersize 8 -translation crlf
set out [open $path(test2) w]
+ chan configure $out -translation lf
fcopy $in $out
close $in
close $out