X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F12check_error_scope.t;h=14a765596c58f94c029e24f4a14c12379e3e5cc1;hb=d925e93e969c28bd2d5634ebf1424dccea0db46c;hp=f590c817e378ab8dd5affd300e6f9afb5a93119f;hpb=60c13c3b6a67b93b29fdfd9677fb12f923527eae;p=catagits%2FCatalyst-Plugin-Static-Simple.git

diff --git a/t/12check_error_scope.t b/t/12check_error_scope.t
index f590c81..14a7655 100644
--- a/t/12check_error_scope.t
+++ b/t/12check_error_scope.t
@@ -9,19 +9,21 @@ use FindBin;
 use lib "$FindBin::Bin/lib";
 
 use Test::More tests => 3;
+BEGIN {
+    use Catalyst::Plugin::Static::Simple;
+    Catalyst::Plugin::Static::Simple->meta->add_before_method_modifier(
+        'prepare_action',
+        sub {
+            my ($c) = @_;
+            eval { die("FOO"); };
+
+            ok( $@, '$@ has a value.' );
+        }
+    );
+}
 use Catalyst::Test 'TestApp';
 
-TestApp->config->{ static }->{ dirs } = [ qr{stuff/} ];
-my $orig_sub = *Catalyst::Plugin::Static::Simple::prepare_action{CODE};
-
-*Catalyst::Plugin::Static::Simple::prepare_action = sub {
-	my ($c) = @_;
-
-	eval { die("FOO"); };
-
-	ok ($@, '$@ has a value.');
-	return $orig_sub->( $c );
-};
+TestApp->config->{static}->{dirs} = [qr{stuff/}];
 
 ok( my $res = request("http://localhost/"), 'request ok' );
 ok( $res->code == 200, q{Previous error doesn't crash static::simple} );