while (my ($nr, $bug) = each %scanlib::bugs) {
for my $package (split /[,\s]+/, $bug->{'package'}) {
$package =~ y/A-Z/a-z/;
- $package = $` if ($package =~ /[^-+._a-z0-9]/);
+ $package = $` if ($package =~ /[^-+._:a-z0-9]/);
# this hack is specific to britney counts, and ignores
# bugs tagged ignore for the next testing release
- if (scanlib::check_worry_unstable($bug) and not $bug->{'lenny-ignore'}) {
+ if (scanlib::check_worry_unstable($bug) and not $bug->{$bugcfg::debian_releases->{testing}.'-ignore'}) {
push @{$unstablebugs{$package}}, $nr;
}
if (scanlib::check_worry($bug)) {