Chapril/xmpp.chapril.org-ejabberd
25
1
Fork 0
mirror of https://github.com/processone/ejabberd.git synced 2024-12-26 17:38:45 +01:00
Code Releases Activity

Accept commands: add_commands syntax (along commands: - add_commands)

Browse Source
This commit is contained in:
Paweł Chmielowski 2016-04-21 11:15:53 +02:00
parent 1aae8a9fda
commit 97e3a33077
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/ejabberd_commands.erl
View File

@ -703,10 +703,11 @@ get_access_commands(AccessCommands, _Version) ->
get_commands() -> get_commands() ->
get_commands(?DEFAULT_VERSION). get_commands(?DEFAULT_VERSION).
get_commands(Version) -> get_commands(Version) ->
Opts = ejabberd_config:get_option( Opts0 = ejabberd_config:get_option(
commands, commands,
fun(V) when is_list(V) -> V end, fun(V) when is_list(V) -> V end,
[]), []),
Opts = lists:map(fun(V) when is_tuple(V) -> [V]; (V) -> V end, Opts0),
CommandsList = list_commands_policy(Version), CommandsList = list_commands_policy(Version),
OpenCmds = [N || {N, _, _, open} <- CommandsList], OpenCmds = [N || {N, _, _, open} <- CommandsList],
RestrictedCmds = [N || {N, _, _, restricted} <- CommandsList], RestrictedCmds = [N || {N, _, _, restricted} <- CommandsList],