From: Steinar H. Gunderson <sesse@rietz>
Date: Wed, 7 Mar 2007 23:52:20 +0000 (+0000)
Subject: Turn of the debbugs warnings from check_bug_presence.
X-Git-Url: https://git.donarmstrong.com/?p=bugscan.git;a=commitdiff_plain;h=bc00c7c9f56d7cc857c18e61e6667966a835471d

Turn of the debbugs warnings from check_bug_presence.
---

diff --git a/scanlib.pm b/scanlib.pm
index b207b14..ca042af 100644
--- a/scanlib.pm
+++ b/scanlib.pm
@@ -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));