@@ -1223,6 +1223,9 @@ END_ALWAYS
return sub {
my ($job, $hostidname, $onhost, $uptoincl_testid) = @_;
+ my @x_params;
+ push @x_params, $uptoincl_testid if $will_uptoincl_testid;
+
my $dbg= $debug ? sub {
$debug->("DUR $branch $blessing $job $hostidname $onhost @_");
} : sub { };
@@ -1257,7 +1260,7 @@ END_ALWAYS
my $duration_max= 0;
foreach my $ref (@$refs) {
my @d_d_args = ($ref->{flight}, $job);
- push @d_d_args, $uptoincl_testid if $will_uptoincl_testid;
+ push @d_d_args, @x_params;
$duration_duration_q->execute(@d_d_args);
my ($duration) = $duration_duration_q->fetchrow_array();
$duration_duration_q->finish();
This is going to be useful soon. No functional change. Signed-off-by: Ian Jackson <ian.jackson@eu.citrix.com> --- Osstest/Executive.pm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-)