Turn of the debbugs warnings from check_bug_presence.
authorSteinar H. Gunderson <sesse@rietz>
Wed, 7 Mar 2007 23:52:20 +0000 (23:52 +0000)
committerSteinar H. Gunderson <sesse@rietz>
Wed, 7 Mar 2007 23:52:20 +0000 (23:52 +0000)
scanlib.pm

index b207b14..ca042af 100644 (file)
@@ -227,6 +227,8 @@ sub scanspooldir() {
                # only bother to check the versioning status for the distributions indicated by the tags 
                my $relinfo = "";
                for my $dist qw(oldstable stable testing unstable experimental) {
+                       local $SIG{__WARN__} = sub {};
+
                        next if (!$disttags{$dist});
                        if (Debbugs::Status::check_bug_presence(bug => $f, status => $bug, dist => $dist) eq 'pending') {
                                $relinfo .= uc(substr($dist, 0, 1));