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

fix: parse transfer-encoding properly

Browse source
This commit is contained in:
Simon Cruanes 2020-03-25 22:06:43 -04:00
parent 65f8f957bd
commit e8ed0afe47
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

@ -121,7 +121,7 @@ let accept_deflate (req:_ S.Request.t) =
| None -> false | None -> false
let has_deflate s = let has_deflate s =
try Scanf.sscanf s "deflate; %s" (fun _ -> true) try Scanf.sscanf s "deflate, %s" (fun _ -> true)
with _ -> false with _ -> false
let cb_decode_compressed_stream ~buf_size (req:unit S.Request.t) : _ option = let cb_decode_compressed_stream ~buf_size (req:unit S.Request.t) : _ option =