diff options
Diffstat (limited to 'examples/echo_post/src/toppage_handler.erl')
| -rw-r--r-- | examples/echo_post/src/toppage_handler.erl | 23 |
1 files changed, 10 insertions, 13 deletions
diff --git a/examples/echo_post/src/toppage_handler.erl b/examples/echo_post/src/toppage_handler.erl index f52b6d4..398a377 100644 --- a/examples/echo_post/src/toppage_handler.erl +++ b/examples/echo_post/src/toppage_handler.erl @@ -5,24 +5,21 @@ -export([init/2]). -init(Req, Opts) -> - Method = cowboy_req:method(Req), - HasBody = cowboy_req:has_body(Req), - Req2 = maybe_echo(Method, HasBody, Req), - {ok, Req2, Opts}. +init(Req0, Opts) -> + Method = cowboy_req:method(Req0), + HasBody = cowboy_req:has_body(Req0), + Req = maybe_echo(Method, HasBody, Req0), + {ok, Req, Opts}. -maybe_echo(<<"POST">>, true, Req) -> - {ok, PostVals, Req2} = cowboy_req:read_urlencoded_body(Req), +maybe_echo(<<"POST">>, true, Req0) -> + {ok, PostVals, Req} = cowboy_req:read_urlencoded_body(Req0), Echo = proplists:get_value(<<"echo">>, PostVals), - echo(Echo, Req2), - Req2; + echo(Echo, Req); maybe_echo(<<"POST">>, false, Req) -> - cowboy_req:reply(400, [], <<"Missing body.">>, Req), - Req; + cowboy_req:reply(400, [], <<"Missing body.">>, Req); maybe_echo(_, _, Req) -> %% Method not allowed. - cowboy_req:reply(405, Req), - Req. + cowboy_req:reply(405, Req). echo(undefined, Req) -> cowboy_req:reply(400, [], <<"Missing echo parameter.">>, Req); |