1 package Reaction::UI::ViewPort::Field::Mutable::Array;
5 use namespace::clean -except => [ qw(meta) ];
6 extends 'Reaction::UI::ViewPort::Field::Array';
8 with 'Reaction::UI::ViewPort::Field::Role::Mutable';
13 return $orig->($self) unless @_;
14 my $value = defined $_[0] ? $_[0] : [];
15 $orig->($self, (ref $value eq 'ARRAY' ? $value : [ $value ]));
17 __PACKAGE__->meta->make_immutable;