1use strict;
2use warnings;
3
4use Test::More tests => 1;
5
6use HTML::FormFu;
7use DateTime;
8
9my $form = HTML::FormFu->new(
10    { tt_args => { INCLUDE_PATH => 'share/templates/tt/xhtml' } } );
11
12# check that calling default('') doesn't cause a fatal error
13
14my $date = $form->element('Date')->name('foo')->strftime("%m/%d/%Y")
15    ->year( { reference => 2007 } )->default('');
16
17$form->process;
18
19is( "$form", <<HTML );
20<form action="" method="post">
21<div>
22<span class="elements">
23<select name="foo_day">
24<option value="1">1</option>
25<option value="2">2</option>
26<option value="3">3</option>
27<option value="4">4</option>
28<option value="5">5</option>
29<option value="6">6</option>
30<option value="7">7</option>
31<option value="8">8</option>
32<option value="9">9</option>
33<option value="10">10</option>
34<option value="11">11</option>
35<option value="12">12</option>
36<option value="13">13</option>
37<option value="14">14</option>
38<option value="15">15</option>
39<option value="16">16</option>
40<option value="17">17</option>
41<option value="18">18</option>
42<option value="19">19</option>
43<option value="20">20</option>
44<option value="21">21</option>
45<option value="22">22</option>
46<option value="23">23</option>
47<option value="24">24</option>
48<option value="25">25</option>
49<option value="26">26</option>
50<option value="27">27</option>
51<option value="28">28</option>
52<option value="29">29</option>
53<option value="30">30</option>
54<option value="31">31</option>
55</select>
56<select name="foo_month">
57<option value="1">January</option>
58<option value="2">February</option>
59<option value="3">March</option>
60<option value="4">April</option>
61<option value="5">May</option>
62<option value="6">June</option>
63<option value="7">July</option>
64<option value="8">August</option>
65<option value="9">September</option>
66<option value="10">October</option>
67<option value="11">November</option>
68<option value="12">December</option>
69</select>
70<select name="foo_year">
71<option value="2007">2007</option>
72<option value="2008">2008</option>
73<option value="2009">2009</option>
74<option value="2010">2010</option>
75<option value="2011">2011</option>
76<option value="2012">2012</option>
77<option value="2013">2013</option>
78<option value="2014">2014</option>
79<option value="2015">2015</option>
80<option value="2016">2016</option>
81<option value="2017">2017</option>
82</select>
83</span>
84</div>
85</form>
86HTML
87