X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Flib%2FChainedActionsApp%2FController%2FRoot.pm;h=a4360872feff076a48aa762bd7d46e88c911b170;hp=a50faa17c248bf00ea9b4be96362c5cd36796832;hb=d4f76f02f299906d23b02bb4bb4007de437a8747;hpb=8865ee1205d2f74a601105ae6c85af2cceb8ad7d diff --git a/t/lib/ChainedActionsApp/Controller/Root.pm b/t/lib/ChainedActionsApp/Controller/Root.pm index a50faa1..a436087 100644 --- a/t/lib/ChainedActionsApp/Controller/Root.pm +++ b/t/lib/ChainedActionsApp/Controller/Root.pm @@ -50,6 +50,16 @@ sub account : Chained('account_base') PathPart('') Args(0) { $c->response->body( "This is account " . $c->stash->{account_id} ); } +sub profile_base : Chained('setup') PathPart('account/profile') CaptureArgs(1) { + my($self,$c,$acc_id) = @_; + $c->stash({account_id=>$acc_id}); +} + +sub profile : Chained('profile_base') PathPart('') Args(1) { + my($self,$c,$acc) = @_; + $c->response->body( "This is profile of " . $acc ); +} + sub default : Chained('setup') PathPart('') Args() { my ( $self, $c ) = @_; $c->response->body( 'Page not found' );