fix matching passwords stuff
[catagits/Reaction.git] / lib / Reaction / UI / Widget / Field / Mutable / MatchingPasswords.pm
CommitLineData
24185a7d 1package Reaction::UI::Widget::Field::Mutable::MatchingPasswords;
2
3use Reaction::UI::WidgetClass;
bae75bee 4use namespace::clean -except => [ qw(meta) ];
24185a7d 5
d4667bef 6extends 'Reaction::UI::Widget::Field::Mutable::Password';
577fe414 7
bae75bee 8implements fragment check_field {
9 arg 'field_id' => event_id 'check_value';
10 arg 'field_name' => event_id 'check_value';
bae75bee 11 render 'field'; #piggyback!
12};
577fe414 13
bae75bee 14implements fragment check_label {
15 if (my $label = $_{viewport}->check_label) {
d219104c 16 arg label => localized $label;
bae75bee 17 render 'label';
18 }
24185a7d 19};
20
bae75bee 21__PACKAGE__->meta->make_immutable;
22
24185a7d 231;
d4667bef 24
25__END__;