X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Faggregate%2Flive_component_controller_action_chained.t;h=74db1f2f327e3f158999da4b10251cac25fe96cd;hb=30305469e1d8f922119d64d631ccd800358a7698;hp=a08c701db3a911d4932e294f9b12ff590872810e;hpb=42da66a91b0a87ebb81d8552bcd0b05d3557c83e;p=catagits%2FCatalyst-Runtime.git diff --git a/t/aggregate/live_component_controller_action_chained.t b/t/aggregate/live_component_controller_action_chained.t index a08c701..74db1f2 100644 --- a/t/aggregate/live_component_controller_action_chained.t +++ b/t/aggregate/live_component_controller_action_chained.t @@ -10,7 +10,7 @@ our $iters; BEGIN { $iters = $ENV{CAT_BENCH_ITERS} || 1; } -use Test::More tests => 141*$iters; +use Test::More tests => 143*$iters; use Catalyst::Test 'TestApp'; if ( $ENV{CAT_BENCHMARK} ) { @@ -981,4 +981,27 @@ sub run_tests { is( $response->header('X-Catalyst-Executed'), $expected, 'Executed actions' ); } + + # + # */search + # doc/* + # + # request for doc/search should end up in doc/* + { + my @expected = qw[ + TestApp::Controller::Action::Chained->begin + TestApp::Controller::Action::Chained->doc_star + TestApp::Controller::Action::Chained->end + ]; + + my $expected = join( ", ", @expected ); + + ok( my $response = request('http://localhost/chained/doc/search'), + "we prefer static path parts earlier in the chain" ); + TODO: { + local $TODO = 'gbjk never got off his ass and fixed this'; + is( $response->header('X-Catalyst-Executed'), + $expected, 'Executed actions' ); + } + } }