use strict; use warnings; use Test::More tests => 7; use HTML::FormFu; my $form = HTML::FormFu->new( { tt_args => { INCLUDE_PATH => 'share/templates/tt/xhtml' } } ); $form->load_config_file('t/elements/block_repeatable.yml'); my $fs = $form->get_element; my $repeatable = $fs->get_element; { my $return = $repeatable->repeat(2); ok( scalar @$return == 2 ); isa_ok( $return->[0], 'HTML::FormFu::Element::Block' ); isa_ok( $return->[1], 'HTML::FormFu::Element::Block' ); } { my $elems = $repeatable->get_elements; ok( scalar @$elems == 2 ); isa_ok( $elems->[0], 'HTML::FormFu::Element::Block' ); isa_ok( $elems->[1], 'HTML::FormFu::Element::Block' ); } is( $form, <

HTML