start of new widgets for fields
[catagits/Reaction.git] / lib / Reaction / UI / Widget / Field / DateTime.pm
1 package Reaction::UI::Widget::Field::DateTime;
2
3 use Reaction::UI::WidgetClass;
4
5 class DateTime is 'Reaction::UI::Widget::Field', which {
6
7   field renders [ string { $_{viewport}->value_string }, ];
8
9 };
10
11 1;
12
13 =for layout widget
14
15 [% label %] [% field %] [% message %] <br>
16
17 =for layout field
18
19 <!-- We need a replacement for process_attrs -->
20 <input type="text" name="[% name %]" id="[% id %]" value="[% content | html %]" />
21
22 =for layout label
23
24 <!-- This conditional goes away when mst comes up with something better -->
25 [% IF content %]
26   <label for="[% id %]"> [% content | html %]: </label>
27 [% END %]
28
29 =for layout message
30
31 <!-- This conditional goes away when mst comes up with something better -->
32 [% IF content %]
33   <span> [% content | html %] </span>
34 [% END %]
35
36 =cut