use warnings;
use Test::More;
-use Test::Fatal;
+use Test::Exception;
{
package My::Class;
use Moose;
- ::like ::exception {
+ ::throws_ok {
extends 'My::Role';
- }, qr/You cannot inherit from a Moose Role \(My\:\:Role\)/,
+ } qr/You cannot inherit from a Moose Role \(My\:\:Role\)/,
'... this croaks correctly';
}