diff options
| author | Pascal Terjan <pterjan@mageia.org> | 2012-09-19 20:57:16 +0000 |
|---|---|---|
| committer | Pascal Terjan <pterjan@mageia.org> | 2012-09-19 20:57:16 +0000 |
| commit | c50bf7b4a8dbdf530673472d50b3f1f3c0ccedb9 (patch) | |
| tree | 55fa729a2010347c4b314ed173372fd0a8431ad8 | |
| parent | 1672ad124b618f5a30cb29f2df395c48ede21600 (diff) | |
| download | iurt-c50bf7b4a8dbdf530673472d50b3f1f3c0ccedb9.tar iurt-c50bf7b4a8dbdf530673472d50b3f1f3c0ccedb9.tar.gz iurt-c50bf7b4a8dbdf530673472d50b3f1f3c0ccedb9.tar.bz2 iurt-c50bf7b4a8dbdf530673472d50b3f1f3c0ccedb9.tar.xz iurt-c50bf7b4a8dbdf530673472d50b3f1f3c0ccedb9.zip | |
Enforce presence of the archs we want
| -rwxr-xr-x | emi | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -192,12 +192,12 @@ foreach my $prefix (sort keys %pkg_tree) { my $ok = 1; foreach my $section (keys %{$pkg_tree{$prefix}{section}}) { - my $has_arched_packages = scalar(difference2([ keys %{$pkg_tree{$prefix}{section}{$section}{arch}} ], [ qw(src noarch) ])); + my @wanted_archs = defined($pkg_tree{$prefix}{section}{$section}{arch}{noarch}) ? ('noarch') : @{$config->{mandatory_arch}}; my $path = $pkg_tree{$prefix}{section}{$section}{path}; my %missing; plog('DEBUG', "... in $path"); - foreach my $m (if_($has_arched_packages, @{$config->{mandatory_arch}}), 'src') { + foreach my $m (@wanted_archs, 'src') { $excluded{$prefix}{$section}{$m} and next; my $x = "yes"; if (!$pkg_tree{$prefix}{section}{$section}{arch}{$m}) { |