X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F030_roles%2F002_role.t;h=778cd5d714134fbbb3a9c71d9272ba545574488d;hb=53a4d826caec4b82f5b23e0bc0a4e8e2f44243b9;hp=ebccefc46395549a8953d3b6d80d7c8f3086cca4;hpb=478b11a96fdfd6d0b2cc20214fb9e4645b6ef75c;p=gitmo%2FMoose.git

diff --git a/t/030_roles/002_role.t b/t/030_roles/002_role.t
index ebccefc..778cd5d 100644
--- a/t/030_roles/002_role.t
+++ b/t/030_roles/002_role.t
@@ -4,7 +4,7 @@ use strict;
 use warnings;
 
 use Test::More;
-use Test::Fatal;
+use Test::Exception;
 
 =pod
 
@@ -38,9 +38,9 @@ words, should 'has_method' return true for them?
     override 'bling' => sub { "FooRole::bling:override" };
     override 'fling' => sub { "FooRole::fling:override" };
 
-    ::ok ::exception { extends() }, '... extends() is not supported';
-    ::ok ::exception { augment() }, '... augment() is not supported';
-    ::ok ::exception { inner()   }, '... inner() is not supported';
+    ::dies_ok { extends() } '... extends() is not supported';
+    ::dies_ok { augment() } '... augment() is not supported';
+    ::dies_ok { inner()   } '... inner() is not supported';
 
     no Moose::Role;
 }