summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorpatthoyts <patthoyts@users.sourceforge.net>2008-12-11 01:20:02 (GMT)
committerpatthoyts <patthoyts@users.sourceforge.net>2008-12-11 01:20:02 (GMT)
commitf7e06b3b6dd0f30a6ac2a0eb9c83606066682818 (patch)
tree0a0cbaa8b76427bc4ce77b39311e10cae1278ea2
parentfb8da459b418ec25e0dfbaa7f5bfa1e2cbe040f0 (diff)
downloadtcl-f7e06b3b6dd0f30a6ac2a0eb9c83606066682818.zip
tcl-f7e06b3b6dd0f30a6ac2a0eb9c83606066682818.tar.gz
tcl-f7e06b3b6dd0f30a6ac2a0eb9c83606066682818.tar.bz2
[Bug 1929403] specify the translation mode when counting bytes
-rw-r--r--tests/http.test3
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/http.test b/tests/http.test
index 18cf75a..94cc95b 100644
--- a/tests/http.test
+++ b/tests/http.test
@@ -12,7 +12,7 @@
# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
#
#
-# RCS: @(#) $Id: http.test,v 1.48 2008/03/12 09:51:39 hobbs Exp $
+# RCS: @(#) $Id: http.test,v 1.48.2.1 2008/12/11 01:20:02 patthoyts Exp $
if {[lsearch [namespace children] ::tcltest] == -1} {
package require tcltest 2
@@ -364,6 +364,7 @@ test http-4.4 {http::Event} {
test http-4.5 {http::Event} {
set testfile [makeFile "" testfile]
set out [open $testfile w]
+ fconfigure $out -translation lf
set token [http::geturl $url -channel $out]
close $out
upvar #0 $token data