use Test::More tests => 18;

BEGIN {
    use FindBin;
    use lib $FindBin::Bin . "/modules";
}

use_ok 'MyVal::Person';
use_ok 'MyVal::Ticket';

package val::a;

use Validation::Class;

mixin TMP => {
    required => 1,
    between  => '1-255'
};

field name => {
    mixin => 'TMP',
    label => 'Person\'s name'
};

field email => {
    mixin => 'TMP',
    label => 'Person\'s email'
};

package val::b;

use Validation::Class;

field description => {
    mixin => 'TMP',
    label => 'Ticket description'
};

field priority => {
    mixin   => 'TMP',
    label   => 'Ticket priority',
    options => [qw/Low Normal High Other/]
};

{

    package val::test1;

    use Test::More;

    my $foo = val::a->new(params => {flag => 0});
    my $bar = val::b->new(params => {flag => 0});

    ok $foo->fields->{name},  'foo has name';
    ok $foo->fields->{email}, 'foo has email';
    ok !$foo->fields->{description}, 'foo doesnt have description';
    ok !$foo->fields->{priority},    'foo doesnt have priority';

    ok !$bar->fields->{name},  'bar doesnt have name';
    ok !$bar->fields->{email}, 'bar doesnt have email';
    ok $bar->fields->{description}, 'bar has description';
    ok $bar->fields->{priority},    'bar has priority';
}

{

    package val::test2;

    use Test::More;

    my $foo = MyVal::Person->new(params => {flag => 1});
    my $bar = MyVal::Ticket->new(params => {flag => 1});

    ok $foo->fields->{name},  'foo has name';
    ok $foo->fields->{email}, 'foo has email';
    ok !$foo->fields->{description}, 'foo doesnt have description';
    ok !$foo->fields->{priority},    'foo doesnt have priority';

    ok !$bar->fields->{name},  'bar doesnt have name';
    ok !$bar->fields->{email}, 'bar doesnt have email';
    ok $bar->fields->{description}, 'bar has description';
    ok $bar->fields->{priority},    'bar has priority';
}