Merge branch 'master' into australorp

[catagits/Catalyst-Runtime.git] / t / aggregate / live_component_controller_httpmethods.t

diff --git a/t/aggregate/live_component_controller_httpmethods.t b/t/aggregate/live_component_controller_httpmethods.t
index d1bc2de..9cc6e9f 100644 (file)
--- a/t/aggregate/live_component_controller_httpmethods.t
+++ b/t/aggregate/live_component_controller_httpmethods.t
@@ -1,13 +1,17 @@
 use strict;
 use warnings;
 use Test::More;
-use HTTP::Request::Common qw/GET POST DELETE PUT /;
+use HTTP::Request::Common qw/GET POST DELETE PUT/;
  
 use FindBin;
 use lib "$FindBin::Bin/../lib";
 
 use Catalyst::Test 'TestApp';
- 
+
+sub OPTIONS {
+    HTTP::Request->new('OPTIONS', @_);
+}
+
 is(request(GET    '/httpmethods/foo')->content, 'get');
 is(request(POST   '/httpmethods/foo')->content, 'post');
 is(request(DELETE '/httpmethods/foo')->content, 'default');
@@ -20,19 +24,26 @@ is(request(GET    '/httpmethods/baz')->content, 'any');
 is(request(POST   '/httpmethods/baz')->content, 'any');
 is(request(DELETE '/httpmethods/baz')->content, 'any');
 
-is(request(GET    '/httpmethods/chained_get')->content, 'chained_get');
-is(request(POST    '/httpmethods/chained_post')->content, 'chained_post');
-is(request(PUT    '/httpmethods/chained_put')->content, 'chained_put');
-is(request(DELETE    '/httpmethods/chained_delete')->content, 'chained_delete');
+is(request(GET    '/httpmethods/chained_get')->content,    'chained_get');
+is(request(POST   '/httpmethods/chained_post')->content,   'chained_post');
+is(request(PUT    '/httpmethods/chained_put')->content,    'chained_put');
+is(request(DELETE '/httpmethods/chained_delete')->content, 'chained_delete');
 
-is(request(GET '/httpmethods/get_put_post_delete')->content, 'get2');
-is(request(POST '/httpmethods/get_put_post_delete')->content, 'post2');
-is(request(PUT '/httpmethods/get_put_post_delete')->content, 'put2');
+is(request(GET    '/httpmethods/get_put_post_delete')->content, 'get2');
+is(request(POST   '/httpmethods/get_put_post_delete')->content, 'post2');
+is(request(PUT    '/httpmethods/get_put_post_delete')->content, 'put2');
 is(request(DELETE '/httpmethods/get_put_post_delete')->content, 'delete2');
 
-is(request(GET '/httpmethods/check_default')->content, 'get3');
-is(request(POST '/httpmethods/check_default')->content, 'post3');
-is(request(PUT '/httpmethods/check_default')->content, 'chain_default');
+is(request(GET    '/httpmethods/check_default')->content, 'get3');
+is(request(POST   '/httpmethods/check_default')->content, 'post3');
+is(request(PUT    '/httpmethods/check_default')->content, 'chain_default');
+
+is(request(GET    '/httpmethods/opt_typo')->content, 'typo');
+is(request(POST   '/httpmethods/opt_typo')->content, 'typo');
+is(request(PUT    '/httpmethods/opt_typo')->content, 'typo');
 
+is(request(OPTIONS '/httpmethods/opt')->content, 'options');
+is(request(GET     '/httpmethods/opt')->content, 'default');
+is(request(POST    '/httpmethods/opt')->content, 'default');
 
 done_testing;