From 9e7d9be5c3430575761ba55770629e77acfc7692 Mon Sep 17 00:00:00 2001
From: Simon Cruanes <simon.cruanes.2007@m4x.org>
Date: Tue, 28 Feb 2023 11:07:20 -0500
Subject: [PATCH] fix: workaround servers which do not understand Expect header

---
 src/core/Ezcurl_core.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/core/Ezcurl_core.ml b/src/core/Ezcurl_core.ml
index b4b71fb..00983a0 100644
--- a/src/core/Ezcurl_core.ml
+++ b/src/core/Ezcurl_core.ml
@@ -320,7 +320,7 @@ module Make(IO : IO)
         match content_size_ content, meth with
         | None, _ ->
             Printf.eprintf "size not known\n%!";
-            headers := ("transfer-encoding", "chunked") :: !headers
+            headers := ("expect", "") :: ("transfer-encoding", "chunked") :: !headers
         | Some size , POST _ ->
             Curl.set_postfieldsize self size;
         | Some size, _ ->