1 package DX::ActionBuilder::ProxySetToAdd;
3 use DX::Utils qw(VALUE_SET);
6 with 'DX::Role::ActionBuilder';
8 has target_path => (is => 'ro', required => 1, isa => ValuePath);
10 has proxy_to => (is => 'ro', required => 1, isa => ActionBuilder);
12 sub aperture_for_set_value {
15 [ VALUE_SET ,=> @{$self->target_path} ],
16 @{$self->proxy_to->aperture_for_add_member($self->target_path->[-1])}
20 sub action_for_set_value {
21 my ($self, $value) = @_;
22 $self->proxy_to->action_for_add_member($self->target_path->[-1], $value);