@@ -38,8 +38,7 @@ job that matches the settings provided as argument. Useful to find the
38
38
latest build for a given pair of distri and version.
39
39
40
40
=cut
41
- sub latest_build {
42
- my ($self , %args ) = @_ ;
41
+ sub latest_build ($self , %args ) {
43
42
my @conds ;
44
43
my %attrs ;
45
44
my $rsource = $self -> result_source;
@@ -110,9 +109,7 @@ sub latest_jobs ($self, $until = undef) {
110
109
return @latest ;
111
110
}
112
111
113
- sub create_from_settings {
114
- my ($self , $settings , $scheduled_product_id ) = @_ ;
115
-
112
+ sub create_from_settings ($self , $settings , $scheduled_product_id = undef ) {
116
113
my %settings = %$settings ;
117
114
my %new_job_args ;
118
115
@@ -427,9 +424,7 @@ sub cancel_by_settings (
427
424
return $cancelled_jobs ;
428
425
}
429
426
430
- sub next_previous_jobs_query {
431
- my ($self , $job , $jobid , %args ) = @_ ;
432
-
427
+ sub next_previous_jobs_query ($self , $job , $jobid , %args ) {
433
428
my $p_limit = $args {previous_limit };
434
429
my $n_limit = $args {next_limit };
435
430
my @params = (
@@ -452,9 +447,7 @@ sub next_previous_jobs_query {
452
447
}
453
448
454
449
455
- sub stale_ones {
456
- my ($self ) = @_ ;
457
-
450
+ sub stale_ones ($self ) {
458
451
my $dt = DateTime-> from_epoch(
459
452
epoch => time () - OpenQA::App-> singleton-> config-> {global }-> {worker_timeout },
460
453
time_zone => ' UTC'
@@ -472,9 +465,7 @@ sub stale_ones {
472
465
return $self -> search(\%overall_cond , \%attrs );
473
466
}
474
467
475
- sub mark_job_linked {
476
- my ($self , $jobid , $referer_url ) = @_ ;
477
-
468
+ sub mark_job_linked ($self , $jobid , $referer_url ) {
478
469
my $referer = Mojo::URL-> new($referer_url );
479
470
my $referer_host = $referer -> host;
480
471
my $app = OpenQA::App-> singleton;
0 commit comments