* src/ejabberd_s2s.erl: More verbose error handling

SVN Revision: 218

diff --git a/ChangeLog b/ChangeLog
index faddbcde497c507ae424f01e9cfa70a733967435..d62d05a738bec14f0fd274f0bb27e74d93a6d4a3 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2004-03-16  Alexey Shchepin  <alexey@sevcom.net>
+
+       * src/ejabberd_s2s.erl: More verbose error handling
+
 2004-03-15  Alexey Shchepin  <alexey@sevcom.net>
 
        * src/web/ejabberd_web.erl: Minor update

diff --git a/src/ejabberd_s2s.erl b/src/ejabberd_s2s.erl
index ed0fa28a3267579305b8c7203110cf7da120ff85..18a86e6c2a06229a576ba23f62d6191e76c50f5b 100644 (file)
--- a/src/ejabberd_s2s.erl
+++ b/src/ejabberd_s2s.erl
@@ -46,7 +46,8 @@ loop() ->
        {route, From, To, Packet} ->
            case catch do_route(From, To, Packet) of
                {'EXIT', Reason} ->
-                   ?ERROR_MSG("~p", [Reason]);
+                   ?ERROR_MSG("~p~nwhen processing: ~p",
+                              [Reason, {From, To, Packet}]);
                _ ->
                    ok
            end,