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