diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-10-11 06:41:59 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-10-11 06:41:59 (GMT) |
commit | 622fa7382fad66c393cad871bd286025ea082f56 (patch) | |
tree | 75b420c5d8a2724968b22a078ef6b45336057de9 /tests/http.test | |
parent | b2c3781bb08dadad024633598e0d62be4cd1d489 (diff) | |
parent | 0d0cf6602a9b466d777c22736156422c586c8c94 (diff) | |
download | tcl-622fa7382fad66c393cad871bd286025ea082f56.zip tcl-622fa7382fad66c393cad871bd286025ea082f56.tar.gz tcl-622fa7382fad66c393cad871bd286025ea082f56.tar.bz2 |
Merge 8.7
Diffstat (limited to 'tests/http.test')
-rw-r--r-- | tests/http.test | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/http.test b/tests/http.test index c5aa2f5..11bf0f9 100644 --- a/tests/http.test +++ b/tests/http.test @@ -408,10 +408,10 @@ test http-3.27 {http::geturl: -headers override -type} -body { http::cleanup $token } -match regexp -result {(?n)Host .* User-Agent .* -Connection close Content-Type {text/plain;charset=utf-8} Accept \*/\* Accept-Encoding .* +Connection close Content-Length 5} test http-3.28 {http::geturl: -headers override -type default} -body { set token [http::geturl $url/headers -query dummy \ @@ -421,10 +421,10 @@ test http-3.28 {http::geturl: -headers override -type default} -body { http::cleanup $token } -match regexp -result {(?n)Host .* User-Agent .* -Connection close Content-Type {text/plain;charset=utf-8} Accept \*/\* Accept-Encoding .* +Connection close Content-Length 5} test http-3.29 {http::geturl IPv6 address} -body { # We only want to see if the URL gets parsed correctly. This is @@ -461,9 +461,9 @@ test http-3.32 {http::geturl: -headers override -accept default} -body { http::cleanup $token } -match regexp -result {(?n)Host .* User-Agent .* -Connection close Accept text/plain,application/tcl-test-value Accept-Encoding .* +Connection close Content-Type application/x-www-form-urlencoded Content-Length 5} # Bug 838e99a76d |