1 package TestApp::Controller::ActionRoles;
5 BEGIN { extends 'Catalyst::Controller' }
8 action_roles => ['~Kooh'],
10 frew => { boo => 'hello' },
14 sub foo : Local Does('Moo') {}
15 sub bar : Local Does('~Moo') {}
16 sub baz : Local Does('+Moo') {}
17 sub quux : Local Does('Zoo') {}
19 sub corge : Local Does('Moo') ActionClass('TestAfter') {
20 my ($self, $ctx) = @_;
21 $ctx->stash(after_message => 'moo');
24 sub frew : Local Does('Boo') {
25 my ($self, $ctx) = @_;
26 my $boo = $ctx->stash->{action_boo};
27 $ctx->response->body($boo);