projects
/
catagits/Catalyst-Runtime.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
825abc84b0d27118e7b8e9252e84c75a60fdf25d
[catagits/Catalyst-Runtime.git]
/
t
/
lib
/
TestApp
/
ActionRole
/
Kooh.pm
1
package TestApp::ActionRole::Kooh;
2
3
use Moose::Role;
4
use namespace::clean -except => [ 'meta' ];
5
6
after execute => sub {
7
my ($self, $controller, $c) = @_;
8
$c->response->header('X-Affe' => 'Tiger');
9
};
10
11
1;