X-Git-Url: https://git.donarmstrong.com/?p=bugscan.git;a=blobdiff_plain;f=bugreport;h=34ddb6e4643a9b463046ef35e5852d3f956644ba;hp=49bcc929a05a1abbec2af76efb3de7ebbba058f6;hb=b6929df21306bcb09f3ac4592d116bcdc97f09b3;hpb=8fdaf19c4b53bfa22da01dfb2048ec20a6e6767f diff --git a/bugreport b/bugreport index 49bcc92..34ddb6e 100755 --- a/bugreport +++ b/bugreport @@ -4,8 +4,10 @@ # Generate a report of the release-critical bugs for packages use Getopt::Std; -require scanlib; -require bugcfg; +use File::Basename; +use lib dirname(__FILE__); +use bugcfg; +use scanlib; use strict; use warnings; @@ -103,7 +105,7 @@ sub MakeBuglist() { } elsif ($scanlib::bugs{$nr}->{'help'}) { print ''; } - print "" if ($scanlib::bugs{$nr}->{'wheezy-ignore'} || $scanlib::bugs{$nr}->{'squeeze-ignore'}); + print "" if ($scanlib::bugs{$nr}->{$bugcfg::debian_releases->{stable}.'-ignore'} || $scanlib::bugs{$nr}->{$bugcfg::debian_releases->{testing}.'-ignore'}); print "" if $worry; ($sect=$nr) =~ s/([0-9]{2}).*/$1/; printf " %s [%s] [%s] %s\n", scanlib::wwwnumber($nr), @@ -111,7 +113,7 @@ sub MakeBuglist() { scanlib::get_relinfo($scanlib::bugs{$nr}), scanlib::htmlsanit($scanlib::bugs{$nr}->{'subject'}); print "" if $worry; - print "" if ($scanlib::bugs{$nr}->{'wheezy-ignore'} || $scanlib::bugs{$nr}->{'squeeze-ignore'}); + print "" if ($scanlib::bugs{$nr}->{$bugcfg::debian_releases->{stable}.'-ignore'} || $scanlib::bugs{$nr}->{$bugcfg::debian_releases->{testing}.'-ignore'}); } else { printf(" %-6d [%s] [%s] %s\n", $nr, scanlib::get_taginfo($scanlib::bugs{$nr}), scanlib::get_relinfo($scanlib::bugs{$nr}), $scanlib::bugs{$nr}->{'subject'}); @@ -127,7 +129,7 @@ sub MakeBuglist() { } -sub MakeStatistics() { +sub MakeStatistics { my $bugcount=0; # Total number of bugs so far my $patchtotal=0; # Total number of bugs marked patch my $pendingtotal=0; # Total number of bugs marked pending @@ -146,7 +148,7 @@ sub MakeStatistics() { $seen_bugs{$nr} = 1; $pendingtotal++ if ($scanlib::bugs{$nr}->{'pending'}); $patchtotal++ if ($scanlib::bugs{$nr}->{'patch'}); - $ignoretotal++ if ($scanlib::bugs{$nr}->{'wheezy-ignore'} || $scanlib::bugs{$nr}->{'squeeze-ignore'}); + $ignoretotal++ if ($scanlib::bugs{$nr}->{$bugcfg::debian_releases->{stable}.'-ignore'} || $scanlib::bugs{$nr}->{$bugcfg::debian_releases->{testing}.'-ignore'}); $worrytotal++ if (scanlib::check_worry($scanlib::bugs{$nr})); $stabletotal++ if (scanlib::check_worry_stable($scanlib::bugs{$nr})); @@ -210,7 +212,7 @@ FilterPackages($opt_d) if ($opt_d); FilterBugsStable() if ($opt_b); FilterBugs() if ($opt_t); -MakeStatistics if ($opt_s); +MakeStatistics() if ($opt_s); if ($opt_l) { MakeBuglist(); }