Merge pull request esl#23 from egobrain/bugfix/default-connect-timeout

Fix Issue esl#21
campanja-forks · Nov 7, 2018 · 8e34985 · 8e34985
2 parents 4ac71aa + 24295a1
commit 8e34985
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/lhttpc_client.erl b/src/lhttpc_client.erl
@@ -153,7 +153,7 @@ execute(From, Host, Port, Ssl, Path, Method, Hdrs0, Body, Options) ->
     % get the socket connect settings from client or use defaults
     % unfold all atoms and allow users to overwrite a single param only
     DefOptions = proplists:unfold(application:get_env(lhttpc, connect_options, [])),
-    DefTimeout = proplists:get_value(connect_timeout, DefOptions, infinity),
+    DefTimeout = application:get_env(lhttpc, connect_timeout, infinity),
     UserOptions = proplists:unfold(proplists:get_value(connect_options, Options, [])),
     EffectiveTcpOptions0 = lists:ukeymerge(1,
         lists:ukeysort(1, UserOptions),