print {$output} '<p>';
print {$output} (($maint =~ /,/)? "Maintainer for $showpkg is "
: "Maintainers for $showpkg are ") .
- package_links(maint => $maint);
+ package_links(maintainer => $maint);
print {$output} ".</p>\n";
}
else {
push @{$exclude{$key}}, split /\s*,\s*/, $value;
}
+ my $binary_to_source_cache = {};
foreach my $bug (@bugs) {
my %status = %{get_bug_status(bug=>$bug,
(map {exists $param{$_}?($_,$param{$_}):()}
qw(dist version schema bugusertags)
),
(exists $param{arch}?(arch => $param{arch}):(arch => $config{default_architectures})),
+ binary_to_source_cache => $binary_to_source_cache,
)};
next unless %status;
next if bug_filter(bug => $bug,