From d201f013b2e02ee33099df90e20200e718a06c0b Mon Sep 17 00:00:00 2001
From: Alexey Shchepin <alexey@process-one.net>
Date: Tue, 24 May 2016 18:44:07 +0300
Subject: Stronger tests in the test suite, SQL updates and fixes

---
 src/sql_queries.erl | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

(limited to 'src/sql_queries.erl')

diff --git a/src/sql_queries.erl b/src/sql_queries.erl
index 121117574..2afa32ac8 100644
--- a/src/sql_queries.erl
+++ b/src/sql_queries.erl
@@ -273,9 +273,8 @@ users_number(LServer, [{prefix, Prefix}])
 users_number(LServer, []) ->
     users_number(LServer).
 
-add_spool_sql(Username, XML) ->
-    [<<"insert into spool(username, xml) values ('">>,
-     Username, <<"', '">>, XML, <<"');">>].
+add_spool_sql(LUser, XML) ->
+    ?SQL("insert into spool(username, xml) values (%(LUser)s, %(XML)s)").
 
 add_spool(LServer, Queries) ->
     ejabberd_sql:sql_transaction(LServer, Queries).
-- 
cgit v1.2.3