Fix list appending bug

diff --git a/src/ejabberd_commands.erl b/src/ejabberd_commands.erl
index 9496fe09ff92c29ea695d58c0b2aec6de672d980..ef25be2e52fcb9bc636136b9d34ed32a64cef223 100644 (file)
--- a/src/ejabberd_commands.erl
+++ b/src/ejabberd_commands.erl
@@ -774,7 +774,7 @@ expand_commands(L, OpenCmds, UserCmds, AdminCmds, RestrictedCmds) when is_list(L
                    (admin, Acc) -> AdminCmds ++ Acc;
                    (restricted, Acc) -> RestrictedCmds ++ Acc;
                    (Command, Acc) when is_atom(Command) ->
-                        [Command, Acc]
+                        [Command|Acc]
                 end, [], L).
 
 oauth_token_user(noauth) ->