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

Rename hydra_*.pl to hydra-*

Browse Source 
The underscores are ugly and the .pl extension is an implementation
detail that shouldn't be visible to the outside.

Also, get rid of the *.in files.  It's not really necessary to
generate them.  And I was always modifying the wrong file.
This commit is contained in:
Eelco Dolstra
2011-11-30 17:32:50 +01:00
parent 787ed37cb3
commit 82d17a2d0b
12 changed files with 26 additions and 37 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
tests/query-all-tables.pl Executable file
View File

@ -0,0 +1,21 @@
use strict;
use Hydra::Schema;
use Hydra::Helper::Nix;
my $db = openHydraDB;
my @sources = $db->sources;
my $nrtables = scalar(@sources);
use Test::Simple tests => 43;
foreach my $source (@sources) {
my $title = "Basic select query for $source";
if( $source !~ m/^(LatestSucceeded|JobStatus|ActiveJobs)/) {
ok(scalar($db->resultset($source)->all) == 0, $title);
}
else {
ok(scalar($db->resultset($source)->search({},{ bind => ["", "", ""] })) == 0, $title);
}
}