X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMooseX%2FStrictConstructor.pm;h=030230ff97dd0b56f23d7a3061fd45ee03f92b57;hb=2c89d023a1ddcafb64035d89061e12e791ec1938;hp=80e8453c2752dd7755ed533e038913bd5680cae4;hpb=4a070866bc7b2cf1792322865e0c7997ef7401a3;p=gitmo%2FMooseX-StrictConstructor.git diff --git a/lib/MooseX/StrictConstructor.pm b/lib/MooseX/StrictConstructor.pm index 80e8453..030230f 100644 --- a/lib/MooseX/StrictConstructor.pm +++ b/lib/MooseX/StrictConstructor.pm @@ -10,7 +10,6 @@ use Moose::Util::MetaRole; { my %class_meta = ( class => ['MooseX::StrictConstructor::Trait::Class'] ); - if ( $Moose::VERSION < 1.9900 ) { require MooseX::StrictConstructor::Trait::Method::Constructor; $class_meta{constructor} @@ -20,16 +19,6 @@ use Moose::Util::MetaRole; Moose::Exporter->setup_import_methods( class_metaroles => \%class_meta, ); - - my $old_import = __PACKAGE__->can('import'); - no warnings 'redefine'; - *import = sub { - my $caller = caller; - Carp::croak "$_[0] can only be applied to Moose classes" - unless eval { $caller->meta->isa('Moose::Meta::Class') }; - - goto &$old_import; - }; } 1;