diff options
| author | oehhar <harald.oehlmann@elmicron.de> | 2022-05-04 06:56:12 (GMT) |
|---|---|---|
| committer | oehhar <harald.oehlmann@elmicron.de> | 2022-05-04 06:56:12 (GMT) |
| commit | 08515e32c84bb536f017ca02e2ae1a8934d67ba0 (patch) | |
| tree | 0ccf8e8e4dc0eee8906283848137affeb53484d7 /library/http | |
| parent | 616b93b0239bfc54be3cc05955f22e6a07ed0127 (diff) | |
| parent | c7157e0bbdcf351b626e52b5b521a8a68d6334d6 (diff) | |
| download | tcl-08515e32c84bb536f017ca02e2ae1a8934d67ba0.zip tcl-08515e32c84bb536f017ca02e2ae1a8934d67ba0.tar.gz tcl-08515e32c84bb536f017ca02e2ae1a8934d67ba0.tar.bz2 | |
http: tolerant again invalid reply header "content-encoding: UTF-8". Ticket [8eb64b1520]
Diffstat (limited to 'library/http')
| -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 c4f165b..326d9d8 100644 --- a/library/http/http.tcl +++ b/library/http/http.tcl @@ -3456,8 +3456,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" } } } |