diff options
Diffstat (limited to 'tests')
-rw-r--r-- | tests/http.test | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/tests/http.test b/tests/http.test index 3a9d4ba..3ec0a6f 100644 --- a/tests/http.test +++ b/tests/http.test @@ -464,9 +464,8 @@ test http-4.14 {http::Event} -body { error "bogus return from http::geturl" } http::wait $token - http::status $token - # error code varies among platforms. -} -returnCodes 1 -match regexp -result {(connect failed|couldn't open socket)} + lindex [http::error $token] 0 +} -result {connect failed connection refused} # Bogus host test http-4.15 {http::Event} -body { # This test may fail if you use a proxy server. That is to be |