eliminate variable name requirement from query()
[scpubgit/DKit.git] / lib / DX / Op / Materialize.pm
1 package DX::Op::Materialize;
2
3 use Moo;
4
5 with 'DX::Role::Op';
6
7 sub run {
8   my ($self, $state) = @_;
9   foreach my $k (keys %{$state->scope}) {
10     my $var = $state->scope_var($k);
11     next unless $var->is_bound;
12     $state->resolve_value($var);
13   }
14   $state->then($self->next);
15 }
16
17 1;