Revert "convert all uses of Test::Exception to Test::Fatal."

[gitmo/Class-MOP.git] / t / 011_create_class.t

diff --git a/t/011_create_class.t b/t/011_create_class.t
index 1770990..2267b5e 100644 (file)
--- a/t/011_create_class.t
+++ b/t/011_create_class.t
@@ -2,7 +2,7 @@ use strict;
 use warnings;
 
 use Test::More;
-use Test::Fatal;
+use Test::Exception;
 
 use Class::MOP;
 
@@ -73,9 +73,9 @@ is($point->y, 42, '... the y attribute was set properly with the accessor');
 
 is($point->x, 2, '... the x attribute was initialized correctly through the metaobject');
 
-ok exception {
+dies_ok {
     $point->x(42);
-}, '... cannot write to a read-only accessor';
+} '... cannot write to a read-only accessor';
 is($point->x, 2, '... the x attribute was not altered');
 
 $point->clear();