ma27/hydra
0
0
Fork 0
forked from lix-project/hydra
Code Pull requests Activity

RunCommandLogs.t: use test_context to get a specific build

Browse source 
Fixes a build error: Can't use global @_ in 'my' at Schema/Result/RunCommandLogs.t line 20, near ', @_'
This commit is contained in:
Graham Christensen 2021-12-15 12:03:06 -05:00
parent 2f382ba067
commit 06360bfbb6
1 changed files with 6 additions and 14 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

20
t/Schema/Result/RunCommandLogs.t
View file

@ -1,23 +1,16 @@
use strict; use strict;
use warnings; use warnings;
use Setup; use Setup;
my %ctx = test_init();
require Hydra::Schema;
require Hydra::Model::DB;
use Test2::V0; use Test2::V0;
my $db = Hydra::Model::DB->new; my $ctx = test_context();
hydra_setup($db); my $db = $ctx->db();
my $project = $db->resultset('Projects')->create({name => "tests", displayname => "", owner => "root"}); my $builds = $ctx->makeAndEvaluateJobset(
my $jobset = createBaseJobset("basic", "basic.nix", $ctx{jobsdir}); expression => "basic.nix",
ok(evalSucceeds($jobset), "Evaluating jobs/basic.nix should exit with return code 0"); );
is(nrQueuedBuildsForJobset($jobset), 3, "Evaluating jobs/basic.nix should result in 3 builds");
my ($build, @_) = queuedBuildsForJobset($jobset); my $build = $builds->{"empty_dir"};
sub new_run_log { sub new_run_log {
return $db->resultset('RunCommandLogs')->create({ return $db->resultset('RunCommandLogs')->create({
@ -27,7 +20,6 @@ sub new_run_log {
}); });
} }
subtest "Not yet started" => sub { subtest "Not yet started" => sub {
my $runlog = new_run_log(); my $runlog = new_run_log();