aboutsummaryrefslogtreecommitdiff
path: root/src/web/ejabberd_http.erl
diff options
context:
space:
mode:
authorBadlop <badlop@process-one.net>2007-12-07 00:48:11 +0000
committerBadlop <badlop@process-one.net>2007-12-07 00:48:11 +0000
commit95c69b025108b9448af7ded760a57a7df9f2b21b (patch)
tree109bc152f510fe739ff06d6932d3a413d66f0d2e /src/web/ejabberd_http.erl
parent* src/mod_caps.erl: Fix compilation warnings: Part 2 (EJAB-290) (diff)
* src/mod_irc/iconv.erl: Fix compilation warnings: 3 (EJAB-290)
* src/mod_irc/mod_irc.erl: Likewise * src/mod_irc/mod_irc_connection.erl: Likewise * src/mod_pubsub/mod_pubsub.erl: Likewise * src/stringprep/stringprep.erl: Likewise * src/web/ejabberd_http.erl: Likewise * src/web/ejabberd_http_poll.erl: Likewise SVN Revision: 1047
Diffstat (limited to 'src/web/ejabberd_http.erl')
-rw-r--r--src/web/ejabberd_http.erl6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/web/ejabberd_http.erl b/src/web/ejabberd_http.erl
index fde2c55dc..503eaf106 100644
--- a/src/web/ejabberd_http.erl
+++ b/src/web/ejabberd_http.erl
@@ -316,7 +316,7 @@ process_request(#state{request_method = 'POST',
case (catch url_decode_q_split(Path)) of
{'EXIT', _} ->
process_request(false);
- {NPath, Query} ->
+ {NPath, _Query} ->
LPath = string:tokens(NPath, "/"),
LQuery = case (catch parse_urlencoded(Data)) of
{'EXIT', _Reason} ->
@@ -354,7 +354,7 @@ process_request(State) ->
recv_data(State, Len) ->
recv_data(State, Len, []).
-recv_data(State, 0, Acc) ->
+recv_data(_State, 0, Acc) ->
binary_to_list(list_to_binary(Acc));
recv_data(State, Len, Acc) ->
case State#state.trail of
@@ -614,7 +614,7 @@ code_to_phrase(504) -> "Gateway Timeout";
code_to_phrase(505) -> "HTTP Version Not Supported".
-parse_auth(Orig = "Basic " ++ Auth64) ->
+parse_auth(_Orig = "Basic " ++ Auth64) ->
case decode_base64(Auth64) of
{error, _Err} ->
undefined;