summaryrefslogtreecommitdiff
path: root/src/mod_mam_sql.erl
diff options
context:
space:
mode:
authorPaweł Chmielowski <pchmielowski@process-one.net>2019-04-30 13:36:31 +0200
committerPaweł Chmielowski <pchmielowski@process-one.net>2019-04-30 13:36:31 +0200
commitb071c4906fd1b39bfb754bcb0319a5703f6c422a (patch)
tree71f904b72168c5183030fa7a11e45e9c3c76a95c /src/mod_mam_sql.erl
parentDeprecate some listening options (diff)
Fix escaping for sql part of mamsub from muc mam
Diffstat (limited to 'src/mod_mam_sql.erl')
-rw-r--r--src/mod_mam_sql.erl4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/mod_mam_sql.erl b/src/mod_mam_sql.erl
index 38611081..45603565 100644
--- a/src/mod_mam_sql.erl
+++ b/src/mod_mam_sql.erl
@@ -420,11 +420,11 @@ make_sql_query(User, LServer, MAMQuery, RSM, ExtraUsernames) ->
{UserSel, UserWhere} = case ExtraUsernames of
Users when is_list(Users) ->
- EscUsers = [<<"'", (Escape(U))/binary, "'">> || U <- [SUser | Users]],
+ EscUsers = [<<"'", (Escape(U))/binary, "'">> || U <- [User | Users]],
{<<" username,">>,
[<<" username in (">>, str:join(EscUsers, <<",">>), <<")">>]};
subscribers_table ->
- SJid = jid:encode({User, LServer, <<>>}),
+ SJid = Escape(jid:encode({User, LServer, <<>>})),
{<<" username,">>,
[<<" (username = '">>, SUser, <<"'">>,
<<" or username in (select concat(room, '@', host) ",