X-Git-Url: https://git.donarmstrong.com/?p=bugscan.git;a=blobdiff_plain;f=scanlib.pm;h=398687ba0e4011762e49dfdec80fc0fb2d4a2c49;hp=65adb6312e18fff97c260f87f311071e49436452;hb=29552d46bcf1d191395b29cfbb7e5f4093774bc7;hpb=4ef8564c7e87c67015de727dbf9bd23a51f927d3 diff --git a/scanlib.pm b/scanlib.pm index 65adb63..398687b 100644 --- a/scanlib.pm +++ b/scanlib.pm @@ -200,18 +200,6 @@ 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, @@ -250,14 +238,6 @@ sub scanspooldir() { for my $package (split /[,\s]+/, $bug->{'package'}) { $_= $package; y/A-Z/a-z/; $_= $` if m/[^-+._a-z0-9]/; - if (not defined $section{$_}) { - if (defined $debbugssection{$_}) { - $relinfo .= "X"; - } else { - next; # Skip unavailable packages - } - } - push @{$packagelist{$_}}, $f; } @@ -333,7 +313,6 @@ sub check_worry { my ($status) = @_; if ($status =~ m/^\[[^]]*I/ or - $status =~ m/ \[[^]]*X/ or $status !~ m/ \[[^]]*T/) { return 0; }