fix value checking for non-object choices
[catagits/Reaction.git] / lib / Reaction / UI / Widget / Field / Mutable.pm
CommitLineData
2f670e13 1package Reaction::UI::Widget::Field::Mutable;
2
3use Reaction::UI::WidgetClass;
4
36d54b14 5class Mutable is 'Reaction::UI::Widget::Field', which {
2f670e13 6
7 before fragment widget {
62ffa273 8 arg 'field_id' => event_id 'value_string';
9 arg 'field_name' => event_id 'value_string' unless defined $_{field_name};
2f670e13 10 arg 'field_type' => 'text';
11 };
12
13 implements fragment message_fragment {
14 if (my $message = $_{viewport}->message) {
15 arg message => $message;
16 render 'message';
17 }
18 };
19
dcba6edf 20 implements fragment field_is_required {
21 if ( $_{viewport}->attribute->is_required ) {
22 render 'field_is_required_yes';
23 } else {
24 render 'field_is_required_no';
25 }
26 };
27
2f670e13 28};
29
301;
31
32__END__;