simon/ezcurl
1
0
Fork 0
mirror of https://github.com/c-cube/ezcurl.git synced 2026-03-10 07:45:44 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions

Compare commits

base: simon:0c4e9f30e1dff428dea12928c7092ae2c539d5be
Branches Tags
simon:main
simon:gh-pages
simon:simon/picos-backend
simon:v0.3
simon:v0.2.4
simon:v0.2.3
simon:v0.2.2
simon:v0.2.1
simon:v0.2
simon:v0.1
..
compare: simon:4f61478bad741a1cd3d8c0baf25775366fa216dc
Branches Tags
simon:main
simon:gh-pages
simon:simon/picos-backend
simon:v0.3
simon:v0.2.4
simon:v0.2.3
simon:v0.2.2
simon:v0.2.1
simon:v0.2
simon:v0.1

No commits in common. "0c4e9f30e1dff428dea12928c7092ae2c539d5be" and "4f61478bad741a1cd3d8c0baf25775366fa216dc" have entirely different histories.
0c4e9f30e1 ... 4f61478bad

1 changed files with 5 additions and 4 deletions
Show stats Expand all files Collapse all files

9
src/core/ezcurl_core.ml
View file

@ -433,14 +433,15 @@ module Make (IO : IO) : S with type 'a io = 'a IO.t = struct
| POST [] when content <> None -> Curl.set_post self.curl true
| POST l -> Curl.set_httppost self.curl l
| GET -> Curl.set_httpget self.curl true
| (PUT | PATCH) as meth ->
Curl.set_customrequest self.curl (string_of_meth meth);
if content <> None then Curl.set_upload self.curl true
| PUT ->
Curl.set_customrequest self.curl "PUT";
Curl.set_upload self.curl true
| DELETE -> Curl.set_customrequest self.curl "DELETE"
| HEAD -> Curl.set_customrequest self.curl "HEAD"
| CONNECT -> Curl.set_customrequest self.curl "CONNECT"
| 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");
_set_headers self !headers;
Curl.set_headerfunction self.curl (fun s0 ->