$srcs->{$k}->{'status'} = 'installed' if $srcs->{$k}->{'arch'} && $srcs->{$k}->{'arch'} eq 'all';
if (!$srcs->{$k}->{'for-us'} && $srcs->{$k}->{'status'} ne 'installed') {
- $srcs->{$k}->{'status'} = 'auto-not-for-us';
+ $srcs->{$k}->{'status'} = 'arch-not-in-arch-list';
}
delete $srcs->{$k}->{'for-us'};
#$p ||= $pas->{'%'.$k};
#$srcs->{$k}->{'status'} = 'not-for-us' if pasignore($p, $arch);
if (pasignore($pas->{'%'.$k}, $arch)) {
- $srcs->{$k}->{'status'} = 'not-for-us';
+ $srcs->{$k}->{'status'} = 'packages-arch-specific';
next;
}
for my $bin (@{$srcs->{$k}->{'binary'}}) {
+ $srcs->{$k}->{'pas'} = 1 if pasignore($pas->{$bin}, $arch);
next if pasignore($pas->{$bin}, $arch);
next if $binary->{$bin} and $binary->{$bin}->{'arch'} eq 'all';
next SRCS;
}
- $srcs->{$k}->{'status'} = 'not-for-us';
+ if ($srcs->{$k}->{'pas'}) {
+ $srcs->{$k}->{'status'} = 'packages-arch-specific';
+ } else {
+ $srcs->{$k}->{'status'} = 'overwritten-by-arch-all';
+ }
+ delete $srcs->{$k}->{'pas'};
}
$srcs->{'_binary'} = $binary;
local($/) = "\n";