From 295da9cf026143b408120f4d048be317f705ee18 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Micka=C3=ABl=20R=C3=A9mond?=
 <mickael.remond@process-one.net>
Date: Sat, 15 Mar 2008 09:35:33 +0000
Subject: [PATCH] * src/ejabberd_s2s.erl: API improvement: Added
 s2s_connect_hook (EJAB-566).

SVN Revision: 1232
---
 ChangeLog            | 5 +++++
 src/ejabberd_s2s.erl | 1 +
 2 files changed, 6 insertions(+)

diff --git a/ChangeLog b/ChangeLog
index dff2cd6d2..264c32133 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2008-03-15  Mickael Remond  <mremond@process-one.net>
+
+	* src/ejabberd_s2s.erl: API improvement: Added s2s_connect_hook
+	(EJAB-566).
+
 2008-03-13  Badlop  <badlop@process-one.net>
 
 	* src/odbc/ejabberd_odbc.erl: Start ODBC explicitely because
diff --git a/src/ejabberd_s2s.erl b/src/ejabberd_s2s.erl
index eebee741b..59ce83205 100644
--- a/src/ejabberd_s2s.erl
+++ b/src/ejabberd_s2s.erl
@@ -359,6 +359,7 @@ new_connection(MyServer, Server, From, FromTo,
     TRes = mnesia:transaction(F),
     case TRes of
 	{atomic, Pid} ->
+	    ejabberd_hooks:run(s2s_connect_hook, [MyServer, Server]),
 	    ejabberd_s2s_out:start_connection(Pid);
 	_ ->
 	    ejabberd_s2s_out:stop_connection(Pid)