File Coverage

blib/lib/Form/Processor/Field/Weekday.pm

Criterion	Covered	Total	%
statement	13	13	100.0
branch			n/a
condition			n/a
subroutine	4	4	100.0
pod	0	1	0.0
total	17	18	94.4

package Form::Processor::Field::Weekday;
$Form::Processor::Field::Weekday::VERSION = '1.162360';
use strict;
use warnings;
use base 'Form::Processor::Field::Select';



sub init_options {
    my $i    = 0;
    my @days = qw/
        Sunday
        Monday
        Tuesday
        Wednesday
        Thursday
        Friday
        Saturday
        /;
    return [
        map {
            { value => $i++, label => $_ }
            } @days
    ];
}


# ABSTRACT: Select valid day of the week




1;

__END__