Commit | Line | Data |
5213846d |
1 | package Test::Action::Class::Sub; |
2 | use Moose; |
3 | |
4 | extends 'Test::Action::Class'; |
5 | |
6 | before execute => sub { |
7 | my ($self, $controller, $c, @args) = @_; |
8 | $c->response->header( 'Using-Sub-Action' => 'MOO' ); |
9 | }; |
10 | |
11 | no Moose; |
12 | |
13 | 1; |