Do not print full error message when LDAP timeout occurs (EJAB-1324)

diff --git a/src/eldap/eldap_pool.erl b/src/eldap/eldap_pool.erl
index ed03692e7e526651941e42a54e855ca4c6373fc8..c8f224824198da55fdad7a9f490b7af8419045a6 100644 (file)
--- a/src/eldap/eldap_pool.erl
+++ b/src/eldap/eldap_pool.erl
@@ -71,6 +71,8 @@ do_request(Name, {F, Args}) ->
     case pg2:get_closest_pid(make_id(Name)) of
        Pid when is_pid(Pid) ->
            case catch apply(eldap, F, [Pid | Args]) of
+               {'EXIT', {timeout, _}} ->
+                   ?ERROR_MSG("LDAP request failed: timed out", []);
                {'EXIT', Reason} ->
                    ?ERROR_MSG("LDAP request failed: eldap:~p(~p)~nReason: ~p",
                               [F, Args, Reason]),