mirror of
https://github.com/processone/ejabberd.git
synced 2024-11-22 16:20:52 +01:00
* src/web/ejabberd_http.erl: Add 'http_bind' option for easy
configuration of HTTP-Binding SVN Revision: 1101
This commit is contained in:
parent
ccbc4b0c04
commit
27063837ae
@ -1,5 +1,8 @@
|
||||
2007-12-22 Badlop <badlop@process-one.net>
|
||||
|
||||
* src/web/ejabberd_http.erl: Add 'http_bind' option for easy
|
||||
configuration of HTTP-Binding
|
||||
|
||||
* src/mod_announce.erl: Fixed unnoticeable bug related to Node
|
||||
matching. Renamed some nonstandard node names according to
|
||||
XEP-0133. Small reordering of clauses. When editing MOTD, display
|
||||
|
@ -78,19 +78,24 @@ start_link({SockMod, Socket}, Opts) ->
|
||||
ok
|
||||
end,
|
||||
|
||||
%% XXX bard: for backward compatibility: expand web_admin and
|
||||
%% http_poll in Opts respectively to {["admin"],
|
||||
%% ejabberd_web_admin} and {["http-poll"], ejabberd_http_poll}
|
||||
%% XXX bard: for backward compatibility, expand in Opts:
|
||||
%% web_admin -> {["admin"], ejabberd_web_admin}
|
||||
%% http_bind -> {["http-bind"], mod_http_bind}
|
||||
%% http_poll -> {["http-poll"], ejabberd_http_poll}
|
||||
|
||||
RequestHandlers =
|
||||
case lists:keysearch(request_handlers, 1, Opts) of
|
||||
{value, {request_handlers, H}} -> H;
|
||||
false -> []
|
||||
{value, {request_handlers, H}} -> H;
|
||||
false -> []
|
||||
end ++
|
||||
case lists:member(web_admin, Opts) of
|
||||
true -> [{["admin"], ejabberd_web_admin}];
|
||||
false -> []
|
||||
end ++
|
||||
case lists:member(http_bind, Opts) of
|
||||
true -> [{["http-bind"], mod_http_bind}];
|
||||
false -> []
|
||||
end ++
|
||||
case lists:member(http_poll, Opts) of
|
||||
true -> [{["http-poll"], ejabberd_http_poll}];
|
||||
false -> []
|
||||
|
Loading…
Reference in New Issue
Block a user