X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=trunk%2Ft%2Flib%2FTestApp%2FController%2FAction%2FAction.pm;fp=trunk%2Ft%2Flib%2FTestApp%2FController%2FAction%2FAction.pm;h=5049427a5a3b33265c30b1249f45cdab964a1a93;hb=e28a6876ad3e11890226e5bab6df4b0725e0981e;hp=0000000000000000000000000000000000000000;hpb=21c94d83082b43028cafcfb18659090b13d832fa;p=catagits%2FCatalyst-Runtime.git diff --git a/trunk/t/lib/TestApp/Controller/Action/Action.pm b/trunk/t/lib/TestApp/Controller/Action/Action.pm new file mode 100644 index 0000000..5049427 --- /dev/null +++ b/trunk/t/lib/TestApp/Controller/Action/Action.pm @@ -0,0 +1,41 @@ +package TestApp::Controller::Action::Action; + +use strict; +use base 'TestApp::Controller::Action'; + +__PACKAGE__->config( actions => { action_action_five => { ActionClass => '+Catalyst::Action::TestBefore' } } ); + +sub action_action_one : Global : ActionClass('TestBefore') { + my ( $self, $c ) = @_; + $c->res->header( 'X-Action', $c->stash->{test} ); + $c->forward('TestApp::View::Dump::Request'); +} + +sub action_action_two : Global : ActionClass('TestAfter') { + my ( $self, $c ) = @_; + $c->stash->{after_message} = 'awesome'; + $c->forward('TestApp::View::Dump::Request'); +} + +sub action_action_three : Global : ActionClass('+TestApp::Action::TestBefore') { + my ( $self, $c ) = @_; + $c->forward('TestApp::View::Dump::Request'); +} + +sub action_action_four : Global : MyAction('TestMyAction') { + my ( $self, $c ) = @_; + $c->forward('TestApp::View::Dump::Request'); +} + +sub action_action_five : Global { + my ( $self, $c ) = @_; + $c->res->header( 'X-Action', $c->stash->{test} ); + $c->forward('TestApp::View::Dump::Request'); +} + +sub action_action_six : Global : ActionClass('~TestMyAction') { + my ( $self, $c ) = @_; + $c->forward('TestApp::View::Dump::Request'); +} + +1;