From: Zbigniew Łukasiak <zbigniew@lukasiak.name>
Date: Tue, 17 Nov 2009 16:40:16 +0000 (+0000)
Subject: Catalyst::Test ctx_request modifies prepare instead of dispatch (t/live_component_con... 
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=commitdiff_plain;h=8b70d751a35e764fbb36bca7d9cdee626f0ae2c8

Catalyst::Test ctx_request modifies prepare instead of dispatch (t/live_component_controller_context_closure.t)
---

diff --git a/lib/Catalyst/Test.pm b/lib/Catalyst/Test.pm
index 8776803..80043cc 100644
--- a/lib/Catalyst/Test.pm
+++ b/lib/Catalyst/Test.pm
@@ -51,8 +51,10 @@ my $build_exports = sub {
 
         my $meta = Class::MOP::get_metaclass_by_name($class);
         $meta->make_mutable;
-        $meta->add_after_method_modifier( "dispatch", sub {
-            $c = shift;
+        $meta->add_around_method_modifier( "prepare", sub { 
+            my $orig = shift; 
+            my $self = shift; 
+            $c = $self->$orig(@_);
         });
         $meta->make_immutable( replace_constructor => 1 );
         Class::C3::reinitialize(); # Fixes RT#46459, I've failed to write a test for how/why, but it does.