use new moose-exporter init_meta stuff

1 files changed, 7 insertions, 10 deletions

diff --git a/lib/MooseX/NonMoose.pm b/lib/MooseX/NonMoose.pm
index c979bd3..a05ca30 100644
--- a/lib/MooseX/NonMoose.pm
+++ b/lib/MooseX/NonMoose.pm
@@ -1,5 +1,4 @@
 package MooseX::NonMoose;
-use Moose ();
 use Moose::Exporter;
 
 =head1 NAME
@@ -68,20 +67,18 @@ confused by the extra arguments that Moose requires (for attributes, etc.)
 
 =cut
 
-Moose::Exporter->setup_import_methods;
+my ($import, $unimport, $init_meta) = Moose::Exporter->build_import_methods(
+    metaclass_roles         => ['MooseX::NonMoose::Meta::Role::Class'],
+    constructor_class_roles => ['MooseX::NonMoose::Meta::Role::Constructor'],
+    install                 => [qw(import unimport)],
+);
 
 sub init_meta {
-    shift;
+    my $package = shift;
     my %options = @_;
     Carp::cluck('Roles have no use for MooseX::NonMoose')
         if Class::MOP::class_of($options{for_class})->isa('Moose::Meta::Role');
-    Moose::Util::MetaRole::apply_metaclass_roles(
-        for_class               => $options{for_class},
-        metaclass_roles         => ['MooseX::NonMoose::Meta::Role::Class'],
-        constructor_class_roles =>
-            ['MooseX::NonMoose::Meta::Role::Constructor'],
-    );
-    return Class::MOP::class_of($options{for_class});
+    $package->$init_meta(@_);
 }
 
 =head1 TODO