pervasive type constraints
[scpubgit/DX.git] / lib / DX / Action / SetValue.pm
1 package DX::Action::SetValue;
2
3 use DX::Update::SetValue;
4 use DX::Class;
5
6 with 'DX::Role::SimpleAction';
7
8 has new_value => (is => 'ro', required => 1, isa => Value);
9
10 sub _build__updates {
11   my ($self) = @_;
12   [
13     DX::Update::SetValue->new(
14       target_path => $self->target_path,
15       new_value => $self->new_value,
16     )
17   ]
18 }
19
20 1;