Chapril
/
xmpp.chapril.org-ejabberd
mirror of https://github.com/processone/ejabberd.git
24
1
Fork 0
Code Releases Activity

Fix 'request_handlers' transformation 

Fixes #2925
This commit is contained in:
Evgeny Khramtsov 2019-07-03 09:54:56 +03:00
parent 9f9e308241
commit 0fc190e2ef
1 changed files with 20 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

36
src/ejabberd_config_transformer.erl
View File

@ -267,22 +267,26 @@ replace_request_handlers(Opts) ->
(PathMod) -> (PathMod) ->
PathMod PathMod
end, Handlers1), end, Handlers1),
lists:filtermap( Opts1 = lists:filtermap(
fun({captcha, _}) -> false; fun({captcha, _}) -> false;
({register, _}) -> false; ({register, _}) -> false;
({web_admin, _}) -> false; ({web_admin, _}) -> false;
({http_bind, _}) -> false; ({http_bind, _}) -> false;
({xmlrpc, _}) -> false; ({xmlrpc, _}) -> false;
({http_poll, _}) -> ({http_poll, _}) ->
?WARNING_MSG("Listening option 'http_poll' is " ?WARNING_MSG("Listening option 'http_poll' is "
"ignored: HTTP Polling support was " "ignored: HTTP Polling support was "
"removed in ejabberd 15.04. ~s", "removed in ejabberd 15.04. ~s",
[adjust_hint()]), [adjust_hint()]),
false; false;
({request_handlers, _}) -> ({request_handlers, _}) ->
{true, {request_handlers, Handlers2}}; false;
(_) -> true (_) -> true
end, Opts). end, Opts),
case Handlers2 of
[] -> Opts1;
_ -> [{request_handlers, Handlers2}|Opts1]
end.
remove_xmlrpc_access_commands(Opts) -> remove_xmlrpc_access_commands(Opts) ->
lists:filter( lists:filter(