use strict; use warnings; use Test::More tests => 1; use HTML::FormFu; use DateTime; my $form = HTML::FormFu->new({ tt_args => { INCLUDE_PATH => 'share/templates/tt/xhtml' } }); $form->load_config_file('t/deflators/compounddatetime_field_order.yml'); my $datetime = DateTime->new( day => '31', month => '12', year => '1999', ); $form->get_field('dob')->default($datetime); my $html = <
HTML is( "$form", $html );