diff options
| -rw-r--r-- | lib/MooseX/NonMoose.pm | 3 | ||||
| -rw-r--r-- | lib/MooseX/NonMoose/InsideOut.pm | 3 |
2 files changed, 4 insertions, 2 deletions
diff --git a/lib/MooseX/NonMoose.pm b/lib/MooseX/NonMoose.pm index c8b9500..ca10edc 100644 --- a/lib/MooseX/NonMoose.pm +++ b/lib/MooseX/NonMoose.pm @@ -75,8 +75,9 @@ my ($import, $unimport, $init_meta) = Moose::Exporter->build_import_methods( sub init_meta { my $package = shift; my %options = @_; + my $meta = Class::MOP::class_of($options{for_class}); Carp::cluck('Roles have no use for MooseX::NonMoose') - if Class::MOP::class_of($options{for_class})->isa('Moose::Meta::Role'); + if $meta && $meta->isa('Moose::Meta::Role'); $package->$init_meta(@_); } diff --git a/lib/MooseX/NonMoose/InsideOut.pm b/lib/MooseX/NonMoose/InsideOut.pm index 1a8ac4a..8d19bc3 100644 --- a/lib/MooseX/NonMoose/InsideOut.pm +++ b/lib/MooseX/NonMoose/InsideOut.pm @@ -45,8 +45,9 @@ my ($import, $unimport, $init_meta) = Moose::Exporter->build_import_methods( sub init_meta { my $package = shift; my %options = @_; + my $meta = Class::MOP::class_of($options{for_class}); Carp::cluck('Roles have no use for MooseX::NonMoose') - if Class::MOP::class_of($options{for_class})->isa('Moose::Meta::Role'); + if $meta && $meta->isa('Moose::Meta::Role'); $package->$init_meta(@_); } |