simon/tiny_httpd
1
0
Fork 0
mirror of https://github.com/c-cube/tiny_httpd.git synced 2025-12-06 03:05:29 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

fix(zip)

Browse source
This commit is contained in:
Simon Cruanes 2020-05-27 21:40:38 -04:00
parent bbe8d1c504
commit 020dd056ac
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/camlzip/Tiny_httpd_camlzip.ml
View file

@ -168,7 +168,7 @@ let cb_encode_compressed_stream
let set_headers h = let set_headers h =
h h
|> S.Headers.remove "Content-Length" |> S.Headers.remove "Content-Length"
|> S.Headers.set "Content-Encoding" "deflate, chunked" |> S.Headers.set "Content-Encoding" "deflate"
in in
match resp.body with match resp.body with
| `String s when String.length s > compress_above -> | `String s when String.length s > compress_above ->