Commit | Line | Data |
---|---|---|
2f670e13 | 1 | package Reaction::UI::Widget::Field::Mutable; |
2 | ||
3 | use Reaction::UI::WidgetClass; | |
4 | ||
5 | class Field is 'Reaction::UI::Widget::Field', which { | |
6 | ||
7 | before fragment widget { | |
8 | arg 'field_id' => event_id 'value'; | |
9 | arg 'field_name' => event_id 'value'; | |
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 | ||
20 | }; | |
21 | ||
22 | 1; | |
23 | ||
24 | __END__; |