use strict;
use warnings;

use Test::More tests => 2;

use HTML::FormFu;
use DateTime;

my $form = HTML::FormFu->new({ tt_args => { INCLUDE_PATH => 'share/templates/tt/xhtml' } });

$form->load_config_file('t/elements/date_default_datetime_args.yml');

$form->process;

my $dt   = DateTime->now(time_zone => 'Europe/Berlin');
my $year = $dt->year;
my $match_xhtml = qq{<option value="$year" selected="selected">$year</option>};
cmp_ok( $form, '=~', $match_xhtml );

my $hour     = $dt->hour;
$match_xhtml = qq{<option value="$hour" selected="selected">$hour</option>};
cmp_ok( $form, '=~', $match_xhtml );