summaryrefslogtreecommitdiff
path: root/src/web/ejabberd_web.erl
diff options
context:
space:
mode:
authorAlexey Shchepin <alexey@process-one.net>2004-05-22 19:48:35 +0000
committerAlexey Shchepin <alexey@process-one.net>2004-05-22 19:48:35 +0000
commit0b4539caa1271e65e2dbe24d8ae8baba236af3d3 (patch)
treed2ecad40af001136eb143236dcd2bd46b0f54cec /src/web/ejabberd_web.erl
parent* src/mod_muc/mod_muc.erl: Added access rules for using serveice (diff)
* src/web/ejabberd_http.erl: Added options for enabling HTTP
polling and admin interface * src/web/ejabberd_web.erl: Likewise * src/ejabberd.cfg.example: Updated * src/web/ejabberd_web_admin.erl: Updated * doc/guide.tex: Updated SVN Revision: 236
Diffstat (limited to 'src/web/ejabberd_web.erl')
-rw-r--r--src/web/ejabberd_web.erl10
1 files changed, 6 insertions, 4 deletions
diff --git a/src/web/ejabberd_web.erl b/src/web/ejabberd_web.erl
index b59641c4..4ef511e5 100644
--- a/src/web/ejabberd_web.erl
+++ b/src/web/ejabberd_web.erl
@@ -12,7 +12,7 @@
%% External exports
-export([make_xhtml/1,
- process_get/1]).
+ process_get/2]).
-include("ejabberd.hrl").
-include("jlib.hrl").
@@ -49,7 +49,8 @@ make_xhtml(Els) ->
{"value", Value}])).
-process_get(#request{user = User,
+process_get({_, true},
+ #request{user = User,
path = ["admin" | RPath],
q = Query,
lang = Lang} = Request) ->
@@ -69,13 +70,14 @@ process_get(#request{user = User,
[{xmlcdata, "401 Unauthorized"}]}])}
end;
-process_get(#request{user = User,
+process_get({true, _},
+ #request{user = User,
path = ["http-poll" | RPath],
q = Query,
lang = Lang} = Request) ->
ejabberd_http_poll:process_request(Request#request{path = RPath});
-process_get(_Request) ->
+process_get(_, _Request) ->
{404, [], make_xhtml([?XC("h1", "Not found")])}.