X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F010_basics%2F010_method_modifier_with_regexp.t;h=404e20b978c7a7a2daa45fb31e8d1b2f7bd22018;hb=be0ed15704fdad5f2d8517380a6f24687432c1dd;hp=64553f708f85e1955535a83743a9f7310dd53af1;hpb=d03bd989b97597428b460d7f9a021e2931893fa0;p=gitmo%2FMoose.git

diff --git a/t/010_basics/010_method_modifier_with_regexp.t b/t/010_basics/010_method_modifier_with_regexp.t
index 64553f7..404e20b 100644
--- a/t/010_basics/010_method_modifier_with_regexp.t
+++ b/t/010_basics/010_method_modifier_with_regexp.t
@@ -3,9 +3,8 @@
 use strict;
 use warnings;
 
-use Test::More tests => 9;
-use Test::Exception;
-
+use Test::More;
+use Test::Fatal;
 
 
 {
@@ -70,17 +69,18 @@ is( $Cat::AFTER_BARK_COUNTER,  2, 'after modifier is called twice' );
     package Dog::Role;
     use Moose::Role;
 
-    ::dies_ok {
+    ::ok ::exception {
         before qr/bark.*/ => sub {};
-    } '... this is not currently supported';
+    }, '... this is not currently supported';
 
-    ::dies_ok {
+    ::ok ::exception {
         around qr/bark.*/ => sub {};
-    } '... this is not currently supported';
+    }, '... this is not currently supported';
 
-    ::dies_ok {
+    ::ok ::exception {
         after  qr/bark.*/ => sub {};
-    } '... this is not currently supported';
+    }, '... this is not currently supported';
 
 }
 
+done_testing;