X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Fpath_action_empty_brackets.t;h=5d100d5bbd1a8f61dbd3da0a1387e32c0bac5dd2;hp=415f1216a9b2772aee47fad6c18c7c07a729e48f;hb=43b44b3a2ee087f00af6579d3b6ac63f8f645412;hpb=dd6a9f23fda9c6520be5021f7fb51f4fb345c8c4 diff --git a/t/path_action_empty_brackets.t b/t/path_action_empty_brackets.t index 415f121..5d100d5 100644 --- a/t/path_action_empty_brackets.t +++ b/t/path_action_empty_brackets.t @@ -4,7 +4,7 @@ use warnings; use FindBin; use lib "$FindBin::Bin/lib"; -use Test::More tests => 9; +use Test::More tests => 12; use Catalyst::Test 'TestPath'; @@ -23,5 +23,8 @@ use Catalyst::Test 'TestPath'; ok( $response->is_success, '"Path(\'\')" - Response Successful 2xx' ); is( $response->content, 'OK', '"Path(\'\')" - Body okay' ); } - - +{ + ok( my $response = request('http://localhost/four'), 'Request' ); + ok( $response->is_success, '"Path(\'\')" - Response Successful 2xx' ); + is( $response->content, 'OK', '"Path() Args()" - Body okay' ); +} \ No newline at end of file