Revert most of the conversion to Test::Fatal so we can redo it
[gitmo/Moose.git] / t / 030_roles / 022_role_composition_req_methods.t
index 04f6140..e3f1beb 100644 (file)
@@ -4,7 +4,7 @@ use strict;
 use warnings;
 
 use Test::More;
-use Test::Fatal;
+use Test::Exception;
 
 use Moose::Meta::Role::Application::RoleSummation;
 use Moose::Meta::Role::Composite;
@@ -39,9 +39,9 @@ use Moose::Meta::Role::Composite;
 
     is($c->name, 'Role::Foo|Role::Bar', '... got the composite role name');
 
-    ok ! exception {
+    lives_ok {
         Moose::Meta::Role::Application::RoleSummation->new->apply($c);
-    }, '... this succeeds as expected';
+    } '... this succeeds as expected';
 
     is_deeply(
         [ sort $c->get_required_method_list ],
@@ -62,9 +62,9 @@ use Moose::Meta::Role::Composite;
 
     is($c->name, 'Role::Foo|Role::ProvidesFoo', '... got the composite role name');
 
-    ok ! exception {
+    lives_ok {
         Moose::Meta::Role::Application::RoleSummation->new->apply($c);
-    }, '... this succeeds as expected';
+    } '... this succeeds as expected';
 
     is_deeply(
         [ sort $c->get_required_method_list ],
@@ -86,9 +86,9 @@ use Moose::Meta::Role::Composite;
 
     is($c->name, 'Role::Foo|Role::ProvidesFoo|Role::Bar', '... got the composite role name');
 
-    ok ! exception {
+    lives_ok {
         Moose::Meta::Role::Application::RoleSummation->new->apply($c);
-    }, '... this succeeds as expected';
+    } '... this succeeds as expected';
 
     is_deeply(
         [ sort $c->get_required_method_list ],
@@ -111,9 +111,9 @@ use Moose::Meta::Role::Composite;
 
     is($c->name, 'Role::Foo|Role::ProvidesFoo|Role::ProvidesBar|Role::Bar', '... got the composite role name');
 
-    ok ! exception {
+    lives_ok {
         Moose::Meta::Role::Application::RoleSummation->new->apply($c);
-    }, '... this succeeds as expected';
+    } '... this succeeds as expected';
 
     is_deeply(
         [ sort $c->get_required_method_list ],