use inlined module hiding in tests
[catagits/Catalyst-Runtime.git] / t / aggregate / live_component_controller_httpmethods.t
CommitLineData
760d121e 1use strict;
2use warnings;
3use Test::More;
0c246eea 4use HTTP::Request::Common qw/GET POST DELETE PUT/;
760d121e 5
6use FindBin;
7use lib "$FindBin::Bin/../lib";
8
9use Catalyst::Test 'TestApp';
0c246eea 10
11sub OPTIONS {
12 HTTP::Request->new('OPTIONS', @_);
13}
14
760d121e 15is(request(GET '/httpmethods/foo')->content, 'get');
16is(request(POST '/httpmethods/foo')->content, 'post');
17is(request(DELETE '/httpmethods/foo')->content, 'default');
18
19is(request(GET '/httpmethods/bar')->content, 'get or post');
20is(request(POST '/httpmethods/bar')->content, 'get or post');
21is(request(DELETE '/httpmethods/bar')->content, 'default');
22
23is(request(GET '/httpmethods/baz')->content, 'any');
24is(request(POST '/httpmethods/baz')->content, 'any');
25is(request(DELETE '/httpmethods/baz')->content, 'any');
26
f3a49d84 27is(request(GET '/httpmethods/chained_get')->content, 'chained_get');
28is(request(POST '/httpmethods/chained_post')->content, 'chained_post');
29is(request(PUT '/httpmethods/chained_put')->content, 'chained_put');
30is(request(DELETE '/httpmethods/chained_delete')->content, 'chained_delete');
760d121e 31
f3a49d84 32is(request(GET '/httpmethods/get_put_post_delete')->content, 'get2');
33is(request(POST '/httpmethods/get_put_post_delete')->content, 'post2');
34is(request(PUT '/httpmethods/get_put_post_delete')->content, 'put2');
760d121e 35is(request(DELETE '/httpmethods/get_put_post_delete')->content, 'delete2');
36
f3a49d84 37is(request(GET '/httpmethods/check_default')->content, 'get3');
38is(request(POST '/httpmethods/check_default')->content, 'post3');
39is(request(PUT '/httpmethods/check_default')->content, 'chain_default');
760d121e 40
0c246eea 41is(request(GET '/httpmethods/opt_typo')->content, 'typo');
42is(request(POST '/httpmethods/opt_typo')->content, 'typo');
43is(request(PUT '/httpmethods/opt_typo')->content, 'typo');
44
45is(request(OPTIONS '/httpmethods/opt')->content, 'options');
46is(request(GET '/httpmethods/opt')->content, 'default');
47is(request(POST '/httpmethods/opt')->content, 'default');
48
760d121e 49done_testing;