use base qw(Class::MOP::Object);
-our $VERSION = '0.93_02';
+our $VERSION = '1.05';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
}
else {
$value = (defined $value ? overload::StrVal($value) : 'undef');
- return "Validation failed for '" . $self->name . "' failed with value $value";
+ return "Validation failed for '" . $self->name . "' with value $value";
}
}
return if $other->has_parent;
}
- return 1;
+ return;
}
sub is_a_type_of {
=head1 DESCRIPTION
This class represents a single type constraint. Moose's built-in type
-constraints, as well as constraints you define, are all store in a
+constraints, as well as constraints you define, are all stored in a
L<Moose::Meta::TypeConstraint::Registry> object as objects of this
class.