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    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
  28 };
  29
  30 1;
  31
  32 __END__;