mssql specific issue bugfix

SVN Revision: 1074
This commit is contained in:
Christophe Romain 2007-12-17 14:10:26 +00:00
parent 09a30422f5
commit f114517bbc
1 changed files with 3 additions and 4 deletions

View File

@ -371,14 +371,13 @@ get_db_type() ->
mssql.
%% Queries can be either a fun or a list of queries
sql_transaction(_LServer, Queries) when is_list(Queries) ->
sql_transaction(LServer, Queries) when is_list(Queries) ->
%% SQL transaction based on a list of queries
%% This function automatically
F = fun() ->
lists:foreach(fun(Query) ->
sql_query(Query)
end,
Queries)
ejabberd_odbc:sql_query(LServer, Query)
end, Queries)
end,
{atomic, catch F()};
sql_transaction(_LServer, FQueries) ->