indirect via resolve_value method

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

diff --git a/lib/DX/Op/MemberOf.pm b/lib/DX/Op/MemberOf.pm
index e5e9ca4..7b16482 100644 (file)
--- a/lib/DX/Op/MemberOf.pm
+++ b/lib/DX/Op/MemberOf.pm
@@ -16,7 +16,7 @@ sub run {
   );
   my ($member, $of) = @args{qw(member of)};
   die "member bound" if $member->is_bound;
-  my $set = $state->facts->{$of->bound_value};
+  my $set = $state->facts->{$state->resolve_value($of)};
   return $state->then($self->next)
                ->add_dependencies($member->id, $of->id)
                ->bind_root_set($member->id, $set)