use MooseX::StrictConstructor::Trait::Class;
use MooseX::StrictConstructor::Trait::Method::Constructor;;
-Moose::Exporter->setup_import_methods(
- class_metaroles => {
- class => ['MooseX::StrictConstructor::Trait::Class'],
- constructor =>
- ['MooseX::StrictConstructor::Trait::Method::Constructor'],
- },
+my %metaroles = (
+ class => ['MooseX::StrictConstructor::Trait::Class'],
);
+$metaroles{constructor}
+ = ['MooseX::StrictConstructor::Trait::Method::Constructor']
+ if $Moose::VERSION >= 1.9900;
+
+Moose::Exporter->setup_import_methods( class_metaroles => \%metaroles );
+
1;
# ABSTRACT: Make your object constructors blow up on unknown attributes