Fix auth verification in ejabberd_xmlrpc (thanks to Vicis)

diff --git a/src/ejabberd_xmlrpc.erl b/src/ejabberd_xmlrpc.erl
index 40223f77e9173c1332b3690ce45ecc816dcd5434..acda0c7f9c58a86f9bc558d7334b61998dc6be32 100644 (file)
--- a/src/ejabberd_xmlrpc.erl
+++ b/src/ejabberd_xmlrpc.erl
@@ -345,8 +345,10 @@ build_fault_response(Code, ParseString, ParseArgs) ->
 do_command(AccessCommands, Auth, Command, AttrL, ArgsF,
           ResultF) ->
     ArgsFormatted = format_args(AttrL, ArgsF),
+    {UserT, ServerT, PasswordT} = Auth,
+    AuthBin = {list_to_binary(UserT), list_to_binary(ServerT), list_to_binary(PasswordT)},
     Result =
-       ejabberd_commands:execute_command(AccessCommands, Auth,
+       ejabberd_commands:execute_command(AccessCommands, AuthBin,
                                          Command, ArgsFormatted),
     ResultFormatted = format_result(Result, ResultF),
     {command_result, ResultFormatted}.