From ad91aaf81aa7fddba016262f1c8001d479a76be5 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Lo=C3=AFc=20Hoguin?= Date: Wed, 24 Apr 2013 20:28:44 +0200 Subject: Reorganize the http test suite --- test/rest_param_all.erl | 36 ------------------------------------ 1 file changed, 36 deletions(-) delete mode 100644 test/rest_param_all.erl (limited to 'test/rest_param_all.erl') diff --git a/test/rest_param_all.erl b/test/rest_param_all.erl deleted file mode 100644 index 09b8cd3..0000000 --- a/test/rest_param_all.erl +++ /dev/null @@ -1,36 +0,0 @@ --module(rest_param_all). - --export([init/3]). --export([allowed_methods/2]). --export([content_types_provided/2]). --export([get_text_plain/2]). --export([content_types_accepted/2]). --export([put_text_plain/2]). - -init(_Transport, _Req, _Opts) -> - {upgrade, protocol, cowboy_rest}. - -allowed_methods(Req, State) -> - {[<<"GET">>, <<"PUT">>], Req, State}. - -content_types_provided(Req, State) -> - {[{{<<"text">>, <<"plain">>, '*'}, get_text_plain}], Req, State}. - -get_text_plain(Req, State) -> - {{_, _, Param}, Req2} = - cowboy_req:meta(media_type, Req, {{<<"text">>, <<"plain">>}, []}), - Body = if - Param == '*' -> - <<"'*'">>; - Param == [] -> - <<"[]">>; - Param /= [] -> - iolist_to_binary([[Key, $=, Value] || {Key, Value} <- Param]) - end, - {Body, Req2, State}. - -content_types_accepted(Req, State) -> - {[{{<<"text">>, <<"plain">>, '*'}, put_text_plain}], Req, State}. - -put_text_plain(Req, State) -> - {true, Req, State}. -- cgit v1.2.3