X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMoose%2FMeta%2FTypeConstraint%2FEnum.pm;h=76093c29e8d136a6b3159be3dfa6acecfaf6187d;hb=46f7e6a545f17def944b291b05cd5c725bdacead;hp=839ef2fc1e782e0c79eaca16077758959a332a0d;hpb=07b0f1a5599bf1a0ed99933200ca27290e9a468a;p=gitmo%2FMoose.git diff --git a/lib/Moose/Meta/TypeConstraint/Enum.pm b/lib/Moose/Meta/TypeConstraint/Enum.pm index 839ef2f..76093c2 100644 --- a/lib/Moose/Meta/TypeConstraint/Enum.pm +++ b/lib/Moose/Meta/TypeConstraint/Enum.pm @@ -6,7 +6,8 @@ use metaclass; use Moose::Util::TypeConstraints (); -our $VERSION = '0.51'; +our $VERSION = '0.57'; +$VERSION = eval $VERSION; our $AUTHORITY = 'cpan:STEVAN'; use base 'Moose::Meta::TypeConstraint'; @@ -20,7 +21,7 @@ sub new { $args{parent} = Moose::Util::TypeConstraints::find_type_constraint('Str'); - my $self = $class->meta->new_object(%args); + my $self = $class->_new(\%args); $self->compile_type_constraint() unless $self->_has_compiled_type_constraint;