aboutsummaryrefslogtreecommitdiffstats
path: root/lib/Iurt/Queue.pm
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2018-10-15 01:34:47 +0200
committerThierry Vignaud <thierry.vignaud@gmail.com>2018-10-15 01:34:47 +0200
commitb80458f48eeab1469d48fa334e5fafa218536ff2 (patch)
tree08a01b1d8d8d0bde0302e1a34d9c505858d4cb4c /lib/Iurt/Queue.pm
parent8258dcc8fd346aa2036a1fc469c41dfca2274f5d (diff)
downloadiurt-b80458f48eeab1469d48fa334e5fafa218536ff2.tar
iurt-b80458f48eeab1469d48fa334e5fafa218536ff2.tar.gz
iurt-b80458f48eeab1469d48fa334e5fafa218536ff2.tar.bz2
iurt-b80458f48eeab1469d48fa334e5fafa218536ff2.tar.xz
iurt-b80458f48eeab1469d48fa334e5fafa218536ff2.zip
remove unused parameter
Diffstat (limited to 'lib/Iurt/Queue.pm')
-rw-r--r--lib/Iurt/Queue.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/Iurt/Queue.pm b/lib/Iurt/Queue.pm
index 449ec36..7cbc991 100644
--- a/lib/Iurt/Queue.pm
+++ b/lib/Iurt/Queue.pm
@@ -56,7 +56,7 @@ sub apply_to_upload_tree {
}
sub check_if_mandatory_arch_failed {
- my ($media, $prefix, $ent, $config) = @_;
+ my ($media, $ent, $config) = @_;
my $mandatory_arch = get_mandatory_arch($config, $ent->{target});
foreach my $arch (@$mandatory_arch) {
return 1 if $ent->{media}{$media}{failed_arch}{$arch};
@@ -64,7 +64,7 @@ sub check_if_mandatory_arch_failed {
}
sub check_if_all_archs_processed {
- my ($media, $prefix, $ent, $config) = @_;
+ my ($media, $ent, $config) = @_;
return 1 if $ent->{media}{$media}{done_arch}{noarch};
return 1 if $ent->{media}{$media}{failed_arch}{noarch};
my $arch_list = get_target_arch($config, $ent->{target});
@@ -112,7 +112,7 @@ sub cleanup_failed_build {
# keep rpms for other architectures
$ent->{rpms} = $kept_rpms;
# but delete src.rpm if we are now done
- if (check_if_all_archs_processed($media, $prefix, $ent, $config)) {
+ if (check_if_all_archs_processed($media, $ent, $config)) {
foreach my $srpm (@{$ent->{srpms}}) {
my $file = "$todo_dir/${prefix}_$srpm";
plog('DEBUG', "moving $file to $fail_dir/");