start of new widgets for fields
[catagits/Reaction.git] / lib / Reaction / UI / Widget / Field / Boolean.pm
CommitLineData
8f19d042 1package Reaction::UI::Widget::Field::Boolean;
2
3use Reaction::UI::WidgetClass;
4
5class Boolean is 'Reaction::UI::Widget::Field', which {
6
7};
8
91;
10
11=for layout widget
12
13[% label %] [% field %] [% message %] <br>
14
15=for layout field
16
17<!-- We need a replacement for process_attrs -->
18<input type="checkbox" name="[% name %]" id="[% id %]" />
19 [% content | html %]
20</textarea>
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