diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2016-10-08 16:40:35 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2016-10-08 16:40:35 (GMT) |
commit | 0ac8f1e19818ac7aa6fd35de8e3190bcd24dcb6d (patch) | |
tree | 06756b0f17226e049d61d2a49417ea56bb52af04 /tests/httpd | |
parent | fb0c1827eb055322b7c6f0c5dc80673dbbbf1f9f (diff) | |
parent | b7a3af751c2791b0659d8fde644ea66d90f58791 (diff) | |
download | tcl-0ac8f1e19818ac7aa6fd35de8e3190bcd24dcb6d.zip tcl-0ac8f1e19818ac7aa6fd35de8e3190bcd24dcb6d.tar.gz tcl-0ac8f1e19818ac7aa6fd35de8e3190bcd24dcb6d.tar.bz2 |
[838e99a76d] Ensure that encodings are handled with application/xml and friends.
Diffstat (limited to 'tests/httpd')
-rw-r--r-- | tests/httpd | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/tests/httpd b/tests/httpd index 232e80a..8753912 100644 --- a/tests/httpd +++ b/tests/httpd @@ -171,6 +171,10 @@ proc httpdRespond { sock } { set html "$bindata[info hostname]:$port$data(url)" set type application/octet-stream } + *xml* { + set html [encoding convertto utf-8 "<test>\u1234</test>"] + set type "application/xml;charset=UTF-8" + } *post* { set html "Got [string length $data(query)] bytes" set type text/plain |