use strict;
-use warnings;
+use warnings FATAL => 'all';
use Test::More tests => 22;
-use Test::NoWarnings 1.04 ':early';
+use Test::Warnings;
use Moose ();
use Moose::Meta::Class;
+use Module::Runtime 'use_module';
foreach my $role (qw/
MooseX::Getopt
MooseX::Getopt::GLD
MooseX::Getopt::Basic
/) {
- Class::MOP::load_class($role);
+ use_module($role);
my $meta = Moose::Meta::Class->create_anon_class(
superclasses => ['Moose::Object'],