* src/ejabberd_listener.erl: Fix report message of 'undef' error

SVN Revision: 1916

diff --git a/ChangeLog b/ChangeLog
index 9f2b176c3c4e98bfd3cd718b2cc3fb6506aa6516..3a93abae1e4af9e27a6fa2866e02bbd4a8146d31 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2009-02-24  Badlop  <badlop@process-one.net>
+
+       * src/ejabberd_listener.erl: Fix report message of 'undef' error
+
 2009-02-23  Christophe Romain <christophe.romain@process-one.net>
 
        * src/ejabberd_c2s.erl: Do not call mod_caps:clear_caps, this previous

diff --git a/src/ejabberd_listener.erl b/src/ejabberd_listener.erl
index 3c32212572896c4657d13fd53dab5607e5d332d4..adffe66802edf2c8086d728051b8911191bf5258 100644 (file)
--- a/src/ejabberd_listener.erl
+++ b/src/ejabberd_listener.erl
@@ -219,11 +219,11 @@ accept(ListenSocket, Module, Opts) ->
 start_listener(Port, Module, Opts) ->
     case start_listener2(Port, Module, Opts) of
        {ok, _Pid} = R -> R;
-       {error, {{'EXIT', {undef, _}}, _} = Error} ->
+       {error, {{'EXIT', {undef, [{M, _F, _A}|_]}}, _} = Error} ->
            ?ERROR_MSG("Error starting the ejabberd listener: ~p.~n"
                       "It could not be loaded or is not an ejabberd listener.~n"
                       "Error: ~p~n", [Module, Error]),
-           {error, {module_not_available, Module}};
+           {error, {module_not_available, M}};
        {error, {already_started, Pid}} ->
            {ok, Pid};
        {error, Error} ->