eliminate variable name requirement from query()

[scpubgit/DKit.git] / t / basic_rule.t

diff --git a/t/basic_rule.t b/t/basic_rule.t
index 95d2666..1922d7e 100644 (file)
--- a/t/basic_rule.t
+++ b/t/basic_rule.t
@@ -45,7 +45,7 @@ $solver->add_rule(
   server => [ 'S' ] => [ member_of => S => [ value => 'servers' ] ]
 );
 
-my $s = $solver->query([ 'S' ], [ server => 'S' ]);
+my $s = $solver->query([ server => 'S' ]);
 
 is_deeply([ map $_->value_for('S')->{name}, $s->results ], [ sort @servers ]);
 
@@ -61,7 +61,6 @@ $solver->add_rule(
                  );
 
 $s = $solver->query(
-       [ qw(Shell Srv) ],
        [ shell => 'Shell' ],
        [ name => 'Shell', [ value => 'bash' ] ],
        [ server => 'Srv' ],