X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Flib%2FTestApp%2FActionRole%2FKooh.pm;fp=t%2Flib%2FTestApp%2FActionRole%2FKooh.pm;h=fc82bf2a0fd43b8d24df054317df0c0d02a84568;hp=0000000000000000000000000000000000000000;hb=eff6001994ab7558c366fa5f9e5aa8c2de69ac4a;hpb=aea897b2495d079f3849eb30cd3dc7c89b31f742

diff --git a/t/lib/TestApp/ActionRole/Kooh.pm b/t/lib/TestApp/ActionRole/Kooh.pm
new file mode 100644
index 0000000..fc82bf2
--- /dev/null
+++ b/t/lib/TestApp/ActionRole/Kooh.pm
@@ -0,0 +1,12 @@
+package TestApp::ActionRole::Kooh;
+
+use Moose::Role;
+
+use namespace::autoclean;
+
+after execute => sub {
+    my ($self, $controller, $c) = @_;
+    $c->response->header('X-Affe' => 'Tiger');
+};
+
+1;