ahuston-0/hydra
1
0
Fork 0
Code Issues Pull Requests 1 Packages Projects Releases Wiki Activity

Fix tests

Browse Source
This commit is contained in:
Eelco Dolstra
2012-03-13 13:18:40 +01:00
parent 1f268d2d43
commit fa62c8b7f2
3 changed files with 9 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
tests/query-all-tables.pl
View File

@ -1,10 +1,10 @@
use strict;
use Hydra::Schema;
use Hydra::Helper::Nix;
use Hydra::Model::DB;
my $db = openHydraDB;
my $db = Hydra::Model::DB->new;
my @sources = $db->sources;
my @sources = $db->schema->sources;
my $nrtables = scalar(@sources);
use Test::Simple tests => 42;
@ -15,8 +15,7 @@ foreach my $source (@sources) {
ok(scalar($db->resultset($source)->all) == 1, $title);
} elsif( $source !~ m/^(LatestSucceeded|JobStatus|ActiveJobs)/) {
ok(scalar($db->resultset($source)->all) == 0, $title);
}
else {
} else {
ok(scalar($db->resultset($source)->search({},{ bind => ["", "", ""] })) == 0, $title);
}
}