add pgsql driver monitoring

SVN Revision: 1200
2008-02-19 17:06:49 +00:00 · 2008-02-19 17:06:49 +00:00 · c5d3974796
parent 6737a9ff95
commit c5d3974796
2 changed files with 5 additions and 0 deletions
--- a/4
+++ b/4
@ -1,3 +1,7 @@
+2008-02-19  Christophe Romain <christophe.romain@process-one.net>
+
+	* src/odbc/ejabberd_odbc.erl: add pgsql driver monitoring
+
 2008-02-19  Mickael Remond <mremond@process-one.net>

 	* src/ejabberd_config.erl: dirty_get_registered_users now
--- a/src/odbc/ejabberd_odbc.erl
+++ b/src/odbc/ejabberd_odbc.erl
@ -266,6 +266,7 @@ odbc_connect(SQLServer) ->
 pgsql_connect(Server, Port, DB, Username, Password) ->
    case pgsql:connect(Server, DB, Username, Password, Port) of
 	{ok, Ref} ->
+	    erlang:monitor(process, Ref),
 	    {ok, #state{db_ref = Ref, db_type = pgsql}};
 	{error, Reason} ->
 	    ?ERROR_MSG("PostgreSQL connection failed: ~p~n", [Reason]),