Redid conversion to Test::Fatal

[gitmo/Moose.git] / t / 100_bugs / 016_inheriting_from_roles.t

diff --git a/t/100_bugs/016_inheriting_from_roles.t b/t/100_bugs/016_inheriting_from_roles.t
index 2fa0357..8d84c7c 100644 (file)
--- 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;