diff options
author | Mickaël Rémond <mickael.remond@process-one.net> | 2008-03-07 14:49:06 +0000 |
---|---|---|
committer | Mickaël Rémond <mickael.remond@process-one.net> | 2008-03-07 14:49:06 +0000 |
commit | 0f4ee703c6d72b689284908151616371dfde4e38 (patch) | |
tree | 62b23d45cf31bca96c051d534b0e3a978f44f92f /src | |
parent | * doc/guide.tex: Improve documentation of host_config (diff) |
* src/eldap/eldap_pool.erl: Improved logging
SVN Revision: 1220
Diffstat (limited to 'src')
-rw-r--r-- | src/eldap/eldap_pool.erl | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/eldap/eldap_pool.erl b/src/eldap/eldap_pool.erl index f3aad356f..6b6815bfb 100644 --- a/src/eldap/eldap_pool.erl +++ b/src/eldap/eldap_pool.erl @@ -34,6 +34,8 @@ search/2 ]). +-include("ejabberd.hrl"). + %%==================================================================== %% API %%==================================================================== @@ -64,6 +66,8 @@ do_request(Name, {F, Args}) -> Pid when is_pid(Pid) -> case catch apply(eldap, F, [Pid | Args]) of {'EXIT', Reason} -> + ?ERROR_MSG("LDAP request failed: eldap:~p(~p)~nReason: ", + [F, Args, Reason]), {error, Reason}; Reply -> Reply |