[scpubgit/DX.git] / lib / DX / Action / SetValue.pm

package DX::Action::SetValue;

use DX::Update::SetValue;
use DX::Class;

with 'DX::Role::SimpleAction';

has new_value => (is => 'ro', required => 1, isa => Value);

sub _build__updates {
  my ($self) = @_;
  [
    DX::Update::SetValue->new(
      target_path => $self->target_path,
      new_value => $self->new_value,
    )
  ]
}

1;
Commit	Line	Data
efad53c4	1	package DX::Action::SetValue;
	2
	3	use DX::Update::SetValue;
	4	use DX::Class;
	5
0498469a	6	with 'DX::Role::SimpleAction';
efad53c4	7
2548ce61	8	has new_value => (is => 'ro', required => 1, isa => Value);
efad53c4	9
0498469a	10	sub _build__updates {
efad53c4	11	my ($self) = @_;
2548ce61	12	[
	13	DX::Update::SetValue->new(
	14	target_path => $self->target_path,
	15	new_value => $self->new_value,
	16	)
	17	]
efad53c4	18	}
	19
	20	1;