X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fcmop%2Fload.t;h=596a35baf7def1326ed3cbcecfbce5439ddf14d7;hb=b5ae7c005663a1efb5ea4e89ecae184f96569305;hp=f6b3ec41dfd29dfed04ad49562b16556cd99f0f8;hpb=829433c47061dd70a608bfcd940113c4172b6950;p=gitmo%2FMoose.git diff --git a/t/cmop/load.t b/t/cmop/load.t index f6b3ec4..596a35b 100644 --- a/t/cmop/load.t +++ b/t/cmop/load.t @@ -3,6 +3,8 @@ use warnings; use Test::More; +use Class::Load qw(is_class_loaded); + BEGIN { use_ok('Class::MOP'); use_ok('Class::MOP::Mixin'); @@ -49,7 +51,7 @@ my %METAS = ( 'Class::MOP::Class::Immutable::Class::MOP::Class' => Class::MOP::Class::Immutable::Class::MOP::Class->meta, ); -ok( Class::MOP::is_class_loaded($_), '... ' . $_ . ' is loaded' ) +ok( is_class_loaded($_), '... ' . $_ . ' is loaded' ) for keys %METAS; for my $meta (values %METAS) {