Skip to content

Commit

Permalink
a few more equal_to tests
Browse files Browse the repository at this point in the history
  • Loading branch information
kraih committed Sep 27, 2013
1 parent 237d540 commit 2587e03
Showing 1 changed file with 9 additions and 4 deletions.
13 changes: 9 additions & 4 deletions t/mojolicious/validation_lite_app.t
Expand Up @@ -48,12 +48,17 @@ is_deeply [$validation->errors('does_not_exist')->each],
# Equal to
$validation = $t->app->validation;
$validation->input({foo => 'bar', baz => 'bar', yada => 'yada'});
ok $validation->optional('foo')->optional('baz')->equal_to('foo')->is_valid,
'valid';
is_deeply $validation->output, {foo => 'bar', baz => 'bar'}, 'right result';
ok $validation->optional('foo')->equal_to('baz')->is_valid, 'valid';
is_deeply $validation->output, {foo => 'bar'}, 'right result';
ok !$validation->has_error, 'no error';
ok !$validation->optional('baz')->equal_to('does_not_exist')->is_valid,
'not valid';
is_deeply $validation->output, {foo => 'bar'}, 'right result';
ok $validation->has_error, 'has error';
is_deeply [$validation->errors('baz')->each], ['Values are not equal.'],
'right error';
ok !$validation->optional('yada')->equal_to('foo')->is_valid, 'not valid';
is_deeply $validation->output, {foo => 'bar', baz => 'bar'}, 'right result';
is_deeply $validation->output, {foo => 'bar'}, 'right result';
ok $validation->has_error, 'has error';
is_deeply [$validation->errors('yada')->each], ['Values are not equal.'],
'right error';
Expand Down

0 comments on commit 2587e03

Please sign in to comment.