mirror of
https://github.com/c-cube/ezcurl.git
synced 2025-12-06 03:05:31 -05:00
style
This commit is contained in:
parent
93471ea0a7
commit
6795c5b64a
1 changed files with 3 additions and 3 deletions
|
|
@ -293,7 +293,7 @@ module Make(IO : IO)
|
||||||
r)));
|
r)));
|
||||||
(* local state *)
|
(* local state *)
|
||||||
let tries = max tries 1 in (* at least one attempt *)
|
let tries = max tries 1 in (* at least one attempt *)
|
||||||
let body = ref "" in
|
let body = ref "" in
|
||||||
let resp_headers = ref [] in
|
let resp_headers = ref [] in
|
||||||
let resp_headers_done = ref false in (* once we get "\r\n" header line *)
|
let resp_headers_done = ref false in (* once we get "\r\n" header line *)
|
||||||
Curl.set_url self url;
|
Curl.set_url self url;
|
||||||
|
|
@ -321,8 +321,8 @@ module Make(IO : IO)
|
||||||
resp_headers_done := false;
|
resp_headers_done := false;
|
||||||
resp_headers := [];
|
resp_headers := [];
|
||||||
);
|
);
|
||||||
|
|
||||||
resp_headers := s :: !resp_headers;
|
resp_headers := s :: !resp_headers;
|
||||||
);
|
);
|
||||||
String.length s0);
|
String.length s0);
|
||||||
Curl.set_writefunction self
|
Curl.set_writefunction self
|
||||||
|
|
|
||||||
Loading…
Add table
Reference in a new issue