%PDF- %PDF-
Direktori : C:/xampp/perl/vendor/lib/MooseX/Meta/TypeConstraint/Structured/ |
Current File : C:/xampp/perl/vendor/lib/MooseX/Meta/TypeConstraint/Structured/Optional.pm |
package ## Hide from PAUSE MooseX::Meta::TypeConstraint::Structured::Optional; our $VERSION = '0.36'; use Moose; use MooseX::Meta::TypeCoercion::Structured::Optional; extends 'Moose::Meta::TypeConstraint::Parameterizable'; around parameterize => sub { my $orig = shift; my $self = shift; my $ret = $self->$orig(@_); $ret->coercion(MooseX::Meta::TypeCoercion::Structured::Optional->new(type_constraint => $ret)); return $ret; }; no Moose; __PACKAGE__->meta->make_immutable(inline_constructor => 0); 1;