revert r620
[catagits/Reaction.git] / lib / Reaction / UI / ViewPort / Field / Mutable / Password.pm
1 package Reaction::UI::ViewPort::Field::Mutable::Password;
2
3 use Reaction::Class;
4
5 class Password is 'Reaction::UI::ViewPort::Field::String', which {
6   does 'Reaction::UI::ViewPort::Field::Role::Mutable::Simple';
7
8   implements adopt_value_string => as {
9     my ($self) = @_;
10     $self->value($self->value_string);
11   };
12
13 };
14
15 1;