X-Git-Url: https://git.donarmstrong.com/?p=bugscan.git;a=blobdiff_plain;f=scanlib.pm;h=65adb6312e18fff97c260f87f311071e49436452;hp=bda42775f3190b621eee44a6cb17bba58546c50d;hb=4ef8564c7e87c67015de727dbf9bd23a51f927d3;hpb=eeb9193b817dc0b95ce845911c8d9cab4759c8ef diff --git a/scanlib.pm b/scanlib.pm index bda4277..65adb63 100644 --- a/scanlib.pm +++ b/scanlib.pm @@ -200,6 +200,18 @@ sub scanspooldir() { next if (!$disttags{$dist}); + # This is needed for now + my $exists = 0; + for my $arch (@bugcfg::architectures) { + for my $pkg (split /[,\s]+/, $bug->{'package'}) { + my @versions = Debbugs::Packages::getversions($pkg, $dist, $arch); + $exists = 1 if (scalar @versions > 0); + } + last if $exists; + } + + next if !$exists; + my $presence = Debbugs::Status::bug_presence( bug => $f, status => $bug,