X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMoose%2FMeta%2FTypeConstraint%2FEnum.pm;h=4bf23100c8e6690878ac65e20de5b22cf9b95584;hb=50bc108bca305ced4df63a569c9b5f3474f71914;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..4bf2310 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.59'; +$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;