lib/Reaction/UI/Widget/Field/Mutable.pm

   1 package Reaction::UI::Widget::Field::Mutable;
   2
   3 use Reaction::UI::WidgetClass;
   4
   5 class Mutable is 'Reaction::UI::Widget::Field', which {
   6
   7    before fragment widget {
   8      arg 'field_id' => event_id 'value_string';
   9      arg 'field_name' => event_id 'value_string' unless defined $_{field_name};
  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__;