X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Flive%2Fcomponent%2Fcontroller%2Faction%2Fforward.t;fp=t%2Flive%2Fcomponent%2Fcontroller%2Faction%2Fforward.t;h=a68f291d4686db24fa58c7a542feb3792cc7625a;hp=58355af4bd717e659b6b8f709485383c8b1f1f75;hb=ab96c27ad9478fd4bb2734f6b9d1ee95acf190fb;hpb=35bdf5eadf74c6edf4f6015b7f1c689c6092dcf4 diff --git a/t/live/component/controller/action/forward.t b/t/live/component/controller/action/forward.t index 58355af..a68f291 100644 --- a/t/live/component/controller/action/forward.t +++ b/t/live/component/controller/action/forward.t @@ -6,7 +6,7 @@ use warnings; use FindBin; use lib "$FindBin::Bin/../../../lib"; -use Test::More tests => 24; +use Test::More tests => 30; use Catalyst::Test 'TestApp'; @@ -68,11 +68,22 @@ use Catalyst::Test 'TestApp'; { ok( my $response = request('http://localhost/action/forward/with_args/old'), 'Request with args' ); ok( $response->is_success, 'Response Successful 2xx' ); - is( $response->content,'old'); + is( $response->content, 'old' ); } { ok( my $response = request('http://localhost/action/forward/with_method_and_args/old'), 'Request with args and method' ); ok( $response->is_success, 'Response Successful 2xx' ); - is( $response->content,'old'); + is( $response->content, 'old' ); +} + +# test forward with embedded args +{ + ok( my $response = request('http://localhost/action/forward/args_embed_relative'), 'Request' ); + ok( $response->is_success, 'Response Successful 2xx' ); + is( $response->content, 'ok' ); + + ok( my $response = request('http://localhost/action/forward/args_embed_absolute'), 'Request' ); + ok( $response->is_success, 'Response Successful 2xx' ); + is( $response->content, 'ok' ); }