debbugs now supports an arch list to bug_presence, so we can stop finding
authorSteinar H. Gunderson <sesse@rietz>
Sat, 10 Mar 2007 11:45:42 +0000 (11:45 +0000)
committerSteinar H. Gunderson <sesse@rietz>
Sat, 10 Mar 2007 11:45:42 +0000 (11:45 +0000)
versions/sourceversions and let debbugs do that part again.

scanlib.pm

index 4c97a1c..c3e1270 100644 (file)
@@ -230,19 +230,12 @@ sub scanspooldir() {
 
                        next if (!$disttags{$dist});
 
-                       # only check for the archs we care about
-                       my %svhash = ();
-                       for my $arch qw(alpha amd64 arm hppa i386 ia64 mips mipsel powerpc s390 sparc) {
-                               my @versions = Debbugs::Packages::getversions($bug->{'package'}, $dist, $arch);
-                               my @sourceversions = Debbugs::Packages::makesourceversions($bug->{'package'}, $arch, @versions);
-
-                               for my $sv (@sourceversions) {
-                                       $svhash{$sv} = 1;
-                               }
-                       }
-
-                       my @sourceversions = keys %svhash;
-                       my $presence = Debbugs::Status::bug_presence(bug => $f, status => $bug, sourceversions => \@sourceversions);
+                       my $presence = Debbugs::Status::bug_presence(
+                               bug => $f, 
+                               status => $bug, 
+                               dist => $dist, 
+                               arch => [ qw(alpha amd64 arm hppa i386 ia64 mips mipsel powerpc s390 sparc) ]
+                       );
 
                        # ignore bugs that are absent/fixed in this distribution, include everything
                        # else (that is, "found" which says that the bug is present, and undef, which