# shove in bugs which affect this package if there is a package or a
# source given (by default), but no affects options given
if (not exists $param{affects} and not exists $param{noaffects} and
- (exists $param{source} or
+ (exists $param{src} or
exists $param{package})) {
- push @bugs, get_bugs((map {exists $param{$_}?($_ =~ /^(?:package|source)$/?'affects':$_,
- ($_ eq 'source'?'src:'.$param{$_}:$param{$_})):()}
+ push @bugs, get_bugs((map {my $key = $_;
+ exists $param{$key}?($key =~ /^(?:package|src)$/?'affects':$key,
+ ($key eq 'src'?[map {"src:$_"}make_list($param{$key})]:$param{$_})):()}
grep {$_ ne 'newest'}
keys %package_search_keys, 'archive'),
usertags => \%ut,
(closes: #566068). Thanks to Mike Hommey.
* Fix links to PTS pages for src packages (closes: #566089). Thanks to
Sandro Tosi.
+ * Fix affects for source packages (closes: #563470). Thanks to Charles
+ Plessy.
-- Don Armstrong <don@debian.org> Wed, 26 Aug 2009 21:32:53 -0700