From: Zbigniew Łukasiak <zbigniew@lukasiak.name>
Date: Tue, 17 Nov 2009 14:54:07 +0000 (+0000)
Subject: now prepare_action is in Context - fixing test libs (for example for test t/aggregate... 
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=commitdiff_plain;h=8458a66a25f3bd41bc9b6f13a1cd59000a2da411

now prepare_action is in Context - fixing test libs (for example for test t/aggregate/live_component_controller_action_action.t)
---

diff --git a/t/lib/TestApp/Context.pm b/t/lib/TestApp/Context.pm
index 1aa6d7e..e3e8f75 100644
--- a/t/lib/TestApp/Context.pm
+++ b/t/lib/TestApp/Context.pm
@@ -51,6 +51,10 @@ sub execute {
     return $c->SUPER::execute(@_);
 }
 
+after prepare_action => sub{
+    my $c = shift;
+    $c->res->header( 'X-Catalyst-Action' => $c->req->action );
+};
 
 1;