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

Fix broken test

Browse Source
This commit is contained in:
Eelco Dolstra 2011-12-05 15:21:43 +01:00
parent e9c88783ce
commit 09e26a3011
1 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -7,11 +7,13 @@ my $db = openHydraDB;
my @sources = $db->sources; my @sources = $db->sources;
my $nrtables = scalar(@sources); my $nrtables = scalar(@sources);
use Test::Simple tests => 43; use Test::Simple tests => 44;
foreach my $source (@sources) { foreach my $source (@sources) {
my $title = "Basic select query for $source"; my $title = "Basic select query for $source";
if( $source !~ m/^(LatestSucceeded|JobStatus|ActiveJobs)/) { if ($source eq "SchemaVersion") {
ok(scalar($db->resultset($source)->all) == 1, $title);
} elsif( $source !~ m/^(LatestSucceeded|JobStatus|ActiveJobs)/) {
ok(scalar($db->resultset($source)->all) == 0, $title); ok(scalar($db->resultset($source)->all) == 0, $title);
} }
else { else {