simon/ezcurl
1
0
Fork 0
mirror of https://github.com/c-cube/ezcurl.git synced 2025-12-06 03:05:31 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

fix warning

Browse source
This commit is contained in:
Simon Cruanes 2021-09-29 09:04:41 -04:00
parent fe35e81fe0
commit 3d12ab0c1d
No known key found for this signature in database
GPG key ID: 4AC01D0849AA62B6
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/core/Ezcurl_core.ml
View file

@ -82,7 +82,7 @@ let _apply_config (self:t) (config:Config.t) : unit =
Curl.set_verbose self verbose;
Curl.set_maxredirs self max_redirects;
Curl.set_followlocation self follow_location;
opt_iter (fun user_agent -> Curl.set_useragent self user_agent) user_agent;
opt_iter user_agent ~f:(fun user_agent -> Curl.set_useragent self user_agent);
opt_iter authmethod ~f:(Curl.set_httpauth self);
opt_iter username ~f:(Curl.set_username self);
opt_iter password ~f:(Curl.set_password self);