fixed vestigial $ctx access
[catagits/Reaction.git] / lib / Reaction / UI / ViewPort / Field / Mutable / String.pm
1 package Reaction::UI::ViewPort::Field::Mutable::String;
2
3 use Reaction::Class;
4
5 use namespace::clean -except => [ qw(meta) ];
6 extends 'Reaction::UI::ViewPort::Field::String';
7
8 with 'Reaction::UI::ViewPort::Field::Role::Mutable::Simple';
9 sub adopt_value_string {
10   my ($self) = @_;
11   $self->value($self->value_string);
12 };
13
14 __PACKAGE__->meta->make_immutable;
15
16
17 1;