diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-11-05 17:06:22 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-11-05 17:06:22 (GMT) |
commit | cccc07aa2829b401bc101caeb9890a7e876081a2 (patch) | |
tree | 620ee207ede848ef890070313145c275721cb615 /tests/http.test | |
parent | 263312727f8fc4187995ed52540370d6b0589143 (diff) | |
parent | 3b0ee42270085b039b75e2e27a3a145399a1bfac (diff) | |
download | tcl-cccc07aa2829b401bc101caeb9890a7e876081a2.zip tcl-cccc07aa2829b401bc101caeb9890a7e876081a2.tar.gz tcl-cccc07aa2829b401bc101caeb9890a7e876081a2.tar.bz2 |
Merge 8.7
Diffstat (limited to 'tests/http.test')
-rw-r--r-- | tests/http.test | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/http.test b/tests/http.test index a525691..8ed7101 100644 --- a/tests/http.test +++ b/tests/http.test @@ -124,7 +124,7 @@ test http-3.2 {http::geturl} -returnCodes error -body { http::geturl http:junk } -result {Unsupported URL: http:junk} set url //${::HOST}:$port -set badurl //${::HOST}:[expr $port+1] +set badurl //${::HOST}:[expr {$port+1}] test http-3.3 {http::geturl} -body { set token [http::geturl $url] http::data $token |