use warnings;
use Test::More;
-use Test::Fatal;
+use Test::Exception;
{
has 'buz' => ( is => 'rw', default => q{"'\\} );
has 'faz' => ( is => 'rw', default => qq{\0} );
- ::ok ! ::exception { __PACKAGE__->meta->make_immutable },
+ ::lives_ok { __PACKAGE__->meta->make_immutable }
'no errors making a package immutable when it has default values that could break quoting';
}
has 'buz' => ( is => 'rw', default => q{"'\\}, lazy => 1 );
has 'faz' => ( is => 'rw', default => qq{\0}, lazy => 1 );
- ::ok ! ::exception { __PACKAGE__->meta->make_immutable },
+ ::lives_ok { __PACKAGE__->meta->make_immutable }
'no errors making a package immutable when it has lazy default values that could break quoting';
}