From 6168195f6823bb50e36e06244017c342fc02508f Mon Sep 17 00:00:00 2001 From: David Bremner Date: Sat, 19 Mar 2011 10:11:08 -0300 Subject: [PATCH] Check that some suitable keys are found. Make debugging output optional --- unit-tests/20.validator/20.remote.t | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/unit-tests/20.validator/20.remote.t b/unit-tests/20.validator/20.remote.t index 21b55be..509399b 100644 --- a/unit-tests/20.validator/20.remote.t +++ b/unit-tests/20.validator/20.remote.t @@ -26,9 +26,9 @@ isa_ok($validator,'Crypt::Monkeysphere::Validator'); my $return=$validator->query(uid=>$uid); -print Dumper($return); +print Dumper($return) if ($ENV{MSTEST_DEBUG}); -is(defined($return),1); +ok(scalar @{$return->{valid_keys}} > 0); -- 2.26.2