use Moose::Exporter;
use MooseX::UndefTolerant::Attribute;
+use MooseX::UndefTolerant::Constructor;
-our $VERSION = '0.04';
+our $VERSION = '0.07';
Moose::Exporter->setup_import_methods(
- attribute_metaclass_roles => [ 'MooseX::UndefTolerant::Attribute' ]
+ class_metaroles => {
+ attribute => [ 'MooseX::UndefTolerant::Attribute' ],
+ constructor => [ 'MooseX::UndefTolerant::Constructor' ],
+ }
);
1;
=head1 NAME
-MooseX::UndefTolerant - Make your attribute(s) tolerant to undef intitialization
+MooseX::UndefTolerant - Make your attribute(s) tolerant to undef initialization
=head1 SYNOPSIS
real solution was:
if(defined($foo)) {
- $class = My:CLass->new(foo => $foo, bar => 123);
+ $class = My:Class->new(foo => $foo, bar => 123);
} else {
- $class = My:CLass->new(bar => 123);
+ $class = My:Class->new(bar => 123);
}
Or some type of codemulch using ternarys. This module allows you to make
=head1 PER ATTRIBUTE
+See L<MooseX::UndefTolerant::Attribute>.
+
=head1 AUTHOR
Cory G Watson, C<< <gphat at cpan.org> >>