lib/Reaction/UI/Widget/Value.pm

   1 package Reaction::UI::Widget::Value;
   2
   3 use Reaction::UI::WidgetClass;
   4
   5 class Value, which {
   6
   7   before fragment widget {
   8     if ($_{viewport}->can('value_string')) {
   9       arg value => $_{viewport}->value_string;
  10     } elsif($_{viewport}->can('value')) {
  11       arg value => $_{viewport}->value;
  12     }
  13   };
  14
  15 };
  16
  17 1;
  18
  19 __END__;
  20
  21 =head1 NAME
  22
  23 Reaction::UI::Widget::Value
  24
  25 =head1 DESCRIPTION
  26
  27 =head1 FRAGMENTS
  28
  29 =head2 widget
  30
  31 Additional available arguments
  32
  33 =over 4
  34
  35 =item B<value> - The C<value_string> or C<value> of the viewport
  36
  37 =back
  38
  39 =head1 AUTHORS
  40
  41 See L<Reaction::Class> for authors.
  42
  43 =head1 LICENSE
  44
  45 See L<Reaction::Class> for the license.
  46
  47 =cut