diff options
author | oehhar <harald.oehlmann@elmicron.de> | 2022-05-04 07:27:48 (GMT) |
---|---|---|
committer | oehhar <harald.oehlmann@elmicron.de> | 2022-05-04 07:27:48 (GMT) |
commit | 77e411229b33146afcbba7a0f4e0cd0b1c04a30b (patch) | |
tree | 7b72a2c11f0fd8763190c1399e9f6dffc435523d /library | |
parent | 7a0f9e685d9c3f74f6b20ce066545f5893c61071 (diff) | |
parent | a3843c65c1f6da9c1b2c7194cd9330f7ba14b371 (diff) | |
download | tcl-77e411229b33146afcbba7a0f4e0cd0b1c04a30b.zip tcl-77e411229b33146afcbba7a0f4e0cd0b1c04a30b.tar.gz tcl-77e411229b33146afcbba7a0f4e0cd0b1c04a30b.tar.bz2 |
http: tolerant again invalid reply header "content-encoding: UTF-8". Ticket [8eb64b1520]
Diffstat (limited to 'library')
-rw-r--r-- | library/http/http.tcl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/library/http/http.tcl b/library/http/http.tcl index 6f85e99..549f98b 100644 --- a/library/http/http.tcl +++ b/library/http/http.tcl @@ -3575,8 +3575,12 @@ proc http::ContentEncoding {token} { gzip - x-gzip { lappend r gunzip } compress - x-compress { lappend r decompress } identity {} + br { + return -code error\ + "content-encoding \"br\" not implemented" + } default { - return -code error "unsupported content-encoding \"$coding\"" + Log "unknown content-encoding \"$coding\" ignored" } } } |