<% $VA{calendar_von} = &gen_widgets("calendar_html","$PAGE{block}_von","UNIXTIME","SIMPLE","datum",0,$in{"feld_$PAGE{block}_von_epoche"},"DDMMYYYY"); $VA{calendar_bis} = &gen_widgets("calendar_html","$PAGE{block}_bis","UNIXTIME","SIMPLE","datum",0,$in{"feld_$PAGE{block}_bis_epoche"},"DDMMYYYY"); qq(); %> <% my @felder = qw(datum kategorie);$TEMP{felder} = \@felder; my @t = localtime; $t[0]=$t[1]=$t[2]=0; $VA{today_epoche} = timelocal(@t); "";%>