diff options
| author | Mickael Remond <mremond@process-one.net> | 2016-03-29 13:19:16 +0200 |
|---|---|---|
| committer | Mickael Remond <mremond@process-one.net> | 2016-03-29 13:19:16 +0200 |
| commit | b49a615e216f1aaf62ccb8d71250fba1b1240f0b (patch) | |
| tree | 14c9f061cb499b553b290973c421fafbdb860164 /src | |
| parent | Fix commands access check. (diff) | |
Fix commands api option
Diffstat (limited to '')
| -rw-r--r-- | src/ejabberd_commands.erl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/ejabberd_commands.erl b/src/ejabberd_commands.erl index e919d26a..21872aa3 100644 --- a/src/ejabberd_commands.erl +++ b/src/ejabberd_commands.erl @@ -595,7 +595,7 @@ get_commands() -> UserCmds = [N || {N, _, _, user} <- CommandsList], Cmds = lists:foldl( - fun({add_commands, L}, Acc) -> + fun([{add_commands, L}], Acc) -> Cmds = case L of open -> OpenCmds; restricted -> RestrictedCmds; @@ -604,7 +604,7 @@ get_commands() -> _ when is_list(L) -> L end, lists:usort(Cmds ++ Acc); - ({remove_commands, L}, Acc) -> + ([{remove_commands, L}], Acc) -> Cmds = case L of open -> OpenCmds; restricted -> RestrictedCmds; |