24
1
mirror of https://github.com/processone/ejabberd.git synced 2024-06-10 21:47:01 +02:00

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

This commit is contained in:
Evgeniy Khramtsov 2010-11-17 17:14:47 +09:00
parent 549f1029a6
commit 0ccbd7e3f2

View File

@ -71,6 +71,8 @@ do_request(Name, {F, Args}) ->
case pg2:get_closest_pid(make_id(Name)) of case pg2:get_closest_pid(make_id(Name)) of
Pid when is_pid(Pid) -> Pid when is_pid(Pid) ->
case catch apply(eldap, F, [Pid | Args]) of case catch apply(eldap, F, [Pid | Args]) of
{'EXIT', {timeout, _}} ->
?ERROR_MSG("LDAP request failed: timed out", []);
{'EXIT', Reason} -> {'EXIT', Reason} ->
?ERROR_MSG("LDAP request failed: eldap:~p(~p)~nReason: ~p", ?ERROR_MSG("LDAP request failed: eldap:~p(~p)~nReason: ~p",
[F, Args, Reason]), [F, Args, Reason]),