fix: use content-encoding: deflate when returning compressed content

c-cube · c-cube · commit 4023a5ab7906 · 2020-03-25T23:23:06.000-04:00
the RFCs don't mandate it but it seems like chrome and firefox only
understand that.
diff --git a/src/camlzip/Tiny_httpd_camlzip.ml b/src/camlzip/Tiny_httpd_camlzip.ml
@@ -152,7 +152,7 @@ let cb_encode_compressed_stream
         headers=
           (resp.headers
            |> S.Headers.remove "Content-Length"
-           |> S.Headers.set "Transfer-Encoding" "deflate, chunked");
+           |> S.Headers.set "Content-Encoding" "deflate");
         body=`Stream (encode_deflate_stream_ ~buf_size str);
       }
   ) else None

Original file line number	Diff line number	Diff line change
`@@ -152,7 +152,7 @@ let cb_encode_compressed_stream`
`152`	`152`	`headers=`
`153`	`153`	`(resp.headers`
`154`	`154`	`\|> S.Headers.remove "Content-Length"`
`155`		`- \|> S.Headers.set "Transfer-Encoding" "deflate, chunked");`
	`155`	`+ \|> S.Headers.set "Content-Encoding" "deflate");`
`156`	`156`	body=`Stream (encode_deflate_stream_ ~buf_size str);
`157`	`157`	`}`
`158`	`158`	`) else None`