simon/ezcurl
1
0
Fork 0
mirror of https://github.com/c-cube/ezcurl.git synced 2026-03-07 21:47:55 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

PATCH does upload

Browse source
This commit is contained in:
Christopher Zimmermann 2026-02-08 02:09:45 -05:00
parent 4f61478bad
commit 6662364103
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
src/core/ezcurl_core.ml
View file

@ -1,3 +1,4 @@
let opt_iter ~f = function let opt_iter ~f = function
| None -> () | None -> ()
| Some x -> f x | Some x -> f x
@ -441,7 +442,9 @@ module Make (IO : IO) : S with type 'a io = 'a IO.t = struct
| CONNECT -> Curl.set_customrequest self.curl "CONNECT" | CONNECT -> Curl.set_customrequest self.curl "CONNECT"
| OPTIONS -> Curl.set_customrequest self.curl "OPTIONS" | OPTIONS -> Curl.set_customrequest self.curl "OPTIONS"
| TRACE -> Curl.set_customrequest self.curl "TRACE" | TRACE -> Curl.set_customrequest self.curl "TRACE"
| PATCH -> Curl.set_customrequest self.curl "PATCH"); | PATCH ->
Curl.set_customrequest self.curl "PATCH";
Curl.set_upload self.curl true);
_set_headers self !headers; _set_headers self !headers;
Curl.set_headerfunction self.curl (fun s0 -> Curl.set_headerfunction self.curl (fun s0 ->