indirect via resolve_value method

[scpubgit/DKit.git] / lib / DX / Op / Not.pm

diff --git a/lib/DX/Op/Not.pm b/lib/DX/Op/Not.pm
index a70183a..90d99da 100644 (file)
--- a/lib/DX/Op/Not.pm
+++ b/lib/DX/Op/Not.pm
@@ -19,13 +19,10 @@ sub run {
   my $invoke = DX::Op::FromCode->new(
     code => sub {
       my ($self, $state) = @_;
-      my $op = $var->bound_value;
+      my $op = $state->resolve_value($var);
       $state->then($op);
     }
   );
-  my $ret_op = DX::Op::SetScope->new(
-    scope => $state->scope, next => $self->next
-  );
   $state->push_return_then($self->next, $invoke)->mark_choice($var);
 }