X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F100_bugs%2F016_inheriting_from_roles.t;h=8d84c7c521374cb90bb10061e38539893745326d;hb=f0b2e5673e864903e74a429565d0c57b69a60b95;hp=2fa0357130c3b1af8e4a21cdbb96ebc4a5dcb45e;hpb=7ff5653479c2bfc0794635f7fbade9bfe7bb2381;p=gitmo%2FMoose.git

diff --git a/t/100_bugs/016_inheriting_from_roles.t b/t/100_bugs/016_inheriting_from_roles.t
index 2fa0357..8d84c7c 100644
--- a/t/100_bugs/016_inheriting_from_roles.t
+++ b/t/100_bugs/016_inheriting_from_roles.t
@@ -3,9 +3,8 @@
 use strict;
 use warnings;
 
-use Test::More tests => 1;
-use Test::Exception;
-
+use Test::More;
+use Test::Fatal;
 
 
 {
@@ -15,9 +14,10 @@ use Test::Exception;
 {
     package My::Class;
     use Moose;
-    
-    ::throws_ok {
+
+    ::like( ::exception {
         extends 'My::Role';
-    } qr/You cannot inherit from a Moose Role \(My\:\:Role\)/, 
-    '... this croaks correctly';
+    }, qr/You cannot inherit from a Moose Role \(My\:\:Role\)/, '... this croaks correctly' );
 }
+
+done_testing;