diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-05-13 10:18:53 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-05-13 10:18:53 (GMT) |
| commit | 8bb2aa5ce5611245e79c56e1dd6ad0aab2e403b0 (patch) | |
| tree | ae8919ec15b47b996957fdcd0ccaccceec5d4692 /tests/http.test | |
| parent | 2150f5797a81640b55d3ba52d11cb9539c20982f (diff) | |
| parent | a7d78a8fb4183478700856b8ba6471d5157e8a5a (diff) | |
| download | tcl-8bb2aa5ce5611245e79c56e1dd6ad0aab2e403b0.zip tcl-8bb2aa5ce5611245e79c56e1dd6ad0aab2e403b0.tar.gz tcl-8bb2aa5ce5611245e79c56e1dd6ad0aab2e403b0.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'tests/http.test')
| -rw-r--r-- | tests/http.test | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/tests/http.test b/tests/http.test index d1513bf..aeb1029 100644 --- a/tests/http.test +++ b/tests/http.test @@ -676,15 +676,18 @@ test http-7.2 {http::mapReply} { test http-7.3 {http::formatQuery} -setup { set enc [http::config -urlencoding] } -returnCodes error -body { - # this would be reverting to http <=2.4 behavior + # -urlencoding "" no longer supported. Use "iso8859-1". http::config -urlencoding "" http::mapReply "∈" } -cleanup { http::config -urlencoding $enc -} -result "can't read \"formMap(∈)\": no such element in array" +} -result {unknown encoding ""} test http-7.4 {http::formatQuery} -setup { set enc [http::config -urlencoding] } -body { + # this would be reverting to http <=2.4 behavior w/o errors + # with Tcl 8.x (unknown chars become '?'), generating a + # proper exception with Tcl 9.0 http::config -urlencoding "iso8859-1" http::mapReply "∈" } -cleanup { |