diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-06-20 09:44:07 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-06-20 09:44:07 (GMT) |
commit | 4503f8049c9e435aee81d08b5ed7a0d9dc01bd49 (patch) | |
tree | 6e7f608447743bf0e65e1c17811be7a7500e3a07 /tests | |
parent | bce89065de89d1341e53aad824815c1a6a1ac30f (diff) | |
parent | 0f72e7de19985f400051e013c40f53c98d2af9d6 (diff) | |
download | tcl-4503f8049c9e435aee81d08b5ed7a0d9dc01bd49.zip tcl-4503f8049c9e435aee81d08b5ed7a0d9dc01bd49.tar.gz tcl-4503f8049c9e435aee81d08b5ed7a0d9dc01bd49.tar.bz2 |
Merge 8.6
Diffstat (limited to 'tests')
-rw-r--r-- | tests/http.test | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/tests/http.test b/tests/http.test index e8f8405..a6f1ce6 100644 --- a/tests/http.test +++ b/tests/http.test @@ -463,9 +463,12 @@ test http-3.33 {http::geturl application/xml is text} -body { } -cleanup { catch { http::cleanup $token } } -result {test 4660 /test} -test http-3.34 {http::geturl -headers not a dict} -returnCodes error -body { - http::geturl http://test/t -headers NoDict -} -result {Bad value for -headers (NoDict), must be dict} +test http-3.34 {http::geturl -headers not a list} -returnCodes error -body { + http::geturl http://test/t -headers \" +} -result {Bad value for -headers ("), must be list} +test http-3.35 {http::geturl -headers not even number of elements} -returnCodes error -body { + http::geturl http://test/t -headers {List Length 3} +} -result {Bad value for -headers (List Length 3), number of list elements must be even} test http-4.1 {http::Event} -body { set token [http::geturl $url -keepalive 0] |