Fix the timing triggers are invoked

[gitmo/Mouse.git] / t / 403-method-modifiers.t

diff --git a/t/403-method-modifiers.t b/t/403-method-modifiers.t
index 838adee..8a4317f 100644 (file)
--- a/t/403-method-modifiers.t
+++ b/t/403-method-modifiers.t
@@ -1,8 +1,16 @@
 #!/usr/bin/env perl
 use strict;
 use warnings;
-use Test::More tests => 4;
-use Mouse::Util ':test';
+use Test::More;
+BEGIN {
+    if (eval {require Class::Method::Modifiers::Fast } || eval {require Class::Method::Modifiers }) {
+        plan tests => 4;
+    }
+    else {
+        plan skip_all => "Class::Method::Modifiers required for this test";
+    }
+}
+use Test::Exception;
 
 my @calls;
 my ($before, $after, $around);