1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40
|
use strict;
use warnings;
use Test::More tests => 5;
use HTML::FormFu;
my $form = HTML::FormFu->new({ tt_args => { INCLUDE_PATH => 'share/templates/tt/xhtml' } });
$form->load_config_file('t/nested/elements/block_repeatable_multi_named.yml');
my $fieldset = $form->get_element;
my $repeatable = $fieldset->get_element;
my $multi = $repeatable->get_element;
$form->process({
'counter' => 1,
'nested_1.foo' => 'aaa',
'nested_1.multi.bar' => 'bbb',
'nested_1.multi.baz' => 'ccc',
});
ok( $form->submitted_and_valid );
is_deeply(
$form->params,
{
nested_1 => {
foo => 'aaa',
multi => {
bar => 'bbb',
baz => 'ccc',
}
}
}
);
is( $form->param_value('nested_1.foo'), 'aaa' );
is( $form->param_value('nested_1.multi.bar'), 'bbb' );
is( $form->param_value('nested_1.multi.baz'), 'ccc' );
|