/t/list.t
http://github.com/gshank/html-formhandler · Raku · 39 lines · 27 code · 12 blank · 0 comment · 0 complexity · 50e2236bbe51b30d77b3c3afed103b93 MD5 · raw file
- use strict;
- use warnings;
- use Test::More;
- use_ok('HTML::FormHandler::Field::Repeatable');
- {
- package List::Form;
- use HTML::FormHandler::Moose;
- extends 'HTML::FormHandler';
- has_field 'tags' => ( type => 'Repeatable' );
- has_field 'tags.contains';
- }
- my $form = List::Form->new;
- ok( $form, 'form created' );
- my $params = {
- tags => ['linux', 'algorithms', 'loops'],
- };
- $form->process($params);
- ok( $form->validated, 'form validated' );
- is( $form->field('tags')->field('0')->value, 'linux', 'get correct value' );
- my $fif = {
- 'tags.0' => 'linux',
- 'tags.1' => 'algorithms',
- 'tags.2' => 'loops',
- };
- is_deeply( $form->fif, $fif, 'fif is correct' );
- is_deeply( $form->values, $params, 'values are correct' );
- done_testing;