[catagits/Reaction.git] / lib / Reaction / UI / Widget / Value.pm

package Reaction::UI::Widget::Value;

use Reaction::UI::WidgetClass;

class Value, which {

  before fragment widget {
    arg value => $_{viewport}->value_string;
  };

};

1;

__END__;

=head1 NAME

Reaction::UI::Widget::Value

=head1 DESCRIPTION

=head1 FRAGMENTS

=head2 widget

Additional available arguments

=over 4

=item B<value> - The C<value_string> of the viewport

=back

=head1 AUTHORS

See L<Reaction::Class> for authors.

=head1 LICENSE

See L<Reaction::Class> for the license.

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