Redid conversion to Test::Fatal

[gitmo/Moose.git] / t / 010_basics / 004_inner_and_augment.t

diff --git a/t/010_basics/004_inner_and_augment.t b/t/010_basics/004_inner_and_augment.t
index eecd547..cbe96f5 100644 (file)
--- a/t/010_basics/004_inner_and_augment.t
+++ b/t/010_basics/004_inner_and_augment.t
@@ -4,7 +4,7 @@ use strict;
 use warnings;
 
 use Test::More;
-use Test::Exception;
+use Test::Fatal;
 
 
 {
@@ -77,9 +77,9 @@ is($foo->baz(), 'Foo::baz()', '... got the right value from &baz');
 
     sub bling { 'Bling::bling' }
 
-    ::dies_ok {
+    ::isnt( ::exception {
         augment 'bling' => sub {};
-    } '... cannot augment a method which has a local equivalent';
+    }, undef, '... cannot augment a method which has a local equivalent' );
 
 }