From 1650a946f22af82eb3bdf4d4b2733a7376521193 Mon Sep 17 00:00:00 2001
From: Badlop <badlop@process-one.net>
Date: Tue, 24 Feb 2009 17:25:40 +0000
Subject: * src/ejabberd_listener.erl: Fix report message of 'undef' error

SVN Revision: 1916
---
 src/ejabberd_listener.erl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src')

diff --git a/src/ejabberd_listener.erl b/src/ejabberd_listener.erl
index 3c3221257..adffe6680 100644
--- 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} ->
-- 
cgit v1.2.3