File Coverage

blib/lib/FormValidator/Simple/Constraints.pm

Criterion	Covered	Total	%
statement	19	19	100.0
branch			n/a
condition			n/a
subroutine	7	7	100.0
pod	0	1	0.0
total	26	27	96.3

package FormValidator::Simple::Constraints;
use strict;
use base qw/FormValidator::Simple::ArrayList/;
use FormValidator::Simple::Constants;
use FormValidator::Simple::Iterator;

__PACKAGE__->mk_accessors(qw/needs_blank_check/);

sub _init {
    my $self = shift;
    $self->needs_blank_check( FALSE );
}

sub iterator {
    my $self = shift;
    return FormValidator::Simple::Constraint::Iterator->new($self);
}

package FormValidator::Simple::Constraint::Iterator;
use base qw/FormValidator::Simple::Iterator/;

1;
__END__