diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2014-04-20 15:29:12 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2014-04-20 15:29:12 (GMT) |
| commit | 5587ec4f28f74cefb953927bf60c7cef2f2646c9 (patch) | |
| tree | 4f88ad80c9c71d996ca88b794c143cb3b1d374d1 /tests/http.test | |
| parent | 02e0c5c152d48bd9ee31664b92b0ff85b222667f (diff) | |
| parent | 747725c1fcb5991ac7d83a1e7498fc6ddd69d7c4 (diff) | |
| download | tcl-5587ec4f28f74cefb953927bf60c7cef2f2646c9.zip tcl-5587ec4f28f74cefb953927bf60c7cef2f2646c9.tar.gz tcl-5587ec4f28f74cefb953927bf60c7cef2f2646c9.tar.bz2 | |
merge trunk
Diffstat (limited to 'tests/http.test')
| -rw-r--r-- | tests/http.test | 12 |
1 files changed, 4 insertions, 8 deletions
diff --git a/tests/http.test b/tests/http.test index 0f1546f..6569443 100644 --- a/tests/http.test +++ b/tests/http.test @@ -492,14 +492,10 @@ proc myProgress {token total current} { } set progress [list $total $current] } -if 0 { - # This test hangs on Windows95 because the client never gets EOF - set httpLog 1 - test http-4.6.1 {http::Event} knownBug { - set token [http::geturl $url -blocksize 50 -progress myProgress] - return $progress - } {111 111} -} +test http-4.6.1 {http::Event} knownBug { + set token [http::geturl $url -blocksize 50 -progress myProgress] + return $progress +} {111 111} test http-4.7 {http::Event} -body { set token [http::geturl $url -keepalive 0 -progress myProgress] return $progress |