use Test::More tests => 5;
package MyVal;
use Validation::Class;
package main;
my $r = MyVal->new(
fields => {status => {options => 'Active, Inactive'}},
params => {status => 'Active'}
);
ok $r->validate(), 'status is valid';
$r->params->{status} = 'active';
ok !$r->validate(), 'status case doesnt match';
ok 'status must be either Active or Inactive' eq $r->errors_to_string(),
'displays proper error message';
$r->params->{status} = 'inactive';
ok !$r->validate(), 'status case doesnt match alt';
$r->params->{status} = 'Inactive';
ok $r->validate(), 'alternate status value validates';
#warn $r->errors_to_string();