From 12f74b4aa79054f186273bf80e8cb2a24f0000ef Mon Sep 17 00:00:00 2001
From: Mickael Remond <mremond@process-one.net>
Date: Tue, 26 Jul 2016 11:57:38 +0200
Subject: [PATCH] Fix list appending bug

---
 src/ejabberd_commands.erl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/ejabberd_commands.erl b/src/ejabberd_commands.erl
index 9496fe09f..ef25be2e5 100644
--- 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) ->