X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FTestApp%2FController%2FAction%2FPath.pm;h=18fa71be9a3ccdc46325c65134ce5db0fd8e0151;hb=fa649eb72f281137df4079d1e2c2025a3c1cfd3f;hp=1c365378d5768ba2e74dbb8cf98ab6c14b9faf30;hpb=66741f94ac93b7ba0989db3556d0e3fe36c1be87;p=catagits%2FCatalyst-Runtime.git diff --git a/t/lib/TestApp/Controller/Action/Path.pm b/t/lib/TestApp/Controller/Action/Path.pm index 1c36537..18fa71b 100644 --- a/t/lib/TestApp/Controller/Action/Path.pm +++ b/t/lib/TestApp/Controller/Action/Path.pm @@ -3,12 +3,20 @@ package TestApp::Controller::Action::Path; use strict; use base 'TestApp::Controller::Action'; -sub one : Action Path("a path with spaces") { +__PACKAGE__->config( + actions => { + 'one' => { 'Path' => [ 'a path with spaces' ] }, + 'two' => { 'Path' => "åäö" }, + 'six' => { 'Local' => undef }, + }, +); + +sub one : Action Path("this_will_be_overriden") { my ( $self, $c ) = @_; $c->forward('TestApp::View::Dump::Request'); } -sub two : Action Path("åäö") { +sub two : Action { my ( $self, $c ) = @_; $c->forward('TestApp::View::Dump::Request'); } @@ -28,4 +36,9 @@ sub five : Path( "spaces_near_parens_doubleq" ) { $c->forward('TestApp::View::Dump::Request'); } +sub six { + my ( $self, $c ) = @_; + $c->forward('TestApp::View::Dump::Request'); +} + 1;