Fix odbc update_t and update insert case return value
This commit is contained in:
parent
f00725dffb
commit
92f89e3d45
|
@ -97,10 +97,14 @@ update_t(Table, Fields, Vals, Where) ->
|
||||||
of
|
of
|
||||||
{updated, 1} -> ok;
|
{updated, 1} -> ok;
|
||||||
_ ->
|
_ ->
|
||||||
ejabberd_odbc:sql_query_t([<<"insert into ">>, Table,
|
Res = ejabberd_odbc:sql_query_t([<<"insert into ">>, Table,
|
||||||
<<"(">>, join(Fields, <<", ">>),
|
<<"(">>, join(Fields, <<", ">>),
|
||||||
<<") values ('">>, join(Vals, <<"', '">>),
|
<<") values ('">>, join(Vals, <<"', '">>),
|
||||||
<<"');">>])
|
<<"');">>]),
|
||||||
|
case Res of
|
||||||
|
{updated,1} -> ok;
|
||||||
|
_ -> Res
|
||||||
|
end
|
||||||
end.
|
end.
|
||||||
|
|
||||||
update(LServer, Table, Fields, Vals, Where) ->
|
update(LServer, Table, Fields, Vals, Where) ->
|
||||||
|
@ -115,10 +119,14 @@ update(LServer, Table, Fields, Vals, Where) ->
|
||||||
of
|
of
|
||||||
{updated, 1} -> ok;
|
{updated, 1} -> ok;
|
||||||
_ ->
|
_ ->
|
||||||
ejabberd_odbc:sql_query(LServer,
|
Res = ejabberd_odbc:sql_query(LServer,
|
||||||
[<<"insert into ">>, Table, <<"(">>,
|
[<<"insert into ">>, Table, <<"(">>,
|
||||||
join(Fields, <<", ">>), <<") values ('">>,
|
join(Fields, <<", ">>), <<") values ('">>,
|
||||||
join(Vals, <<"', '">>), <<"');">>])
|
join(Vals, <<"', '">>), <<"');">>]),
|
||||||
|
case Res of
|
||||||
|
{updated,1} -> ok;
|
||||||
|
_ -> Res
|
||||||
|
end
|
||||||
end.
|
end.
|
||||||
|
|
||||||
%% F can be either a fun or a list of queries
|
%% F can be either a fun or a list of queries
|
||||||
|
|
Loading…
Reference in New Issue