r8984 - /scripts/qa/qareport
tincho-guest at users.alioth.debian.org
tincho-guest at users.alioth.debian.org
Wed Nov 7 18:17:36 UTC 2007
Author: tincho-guest
Date: Wed Nov 7 18:17:36 2007
New Revision: 8984
URL: http://svn.debian.org/wsvn/?sc=1&rev=8984
Log:
Reflect new bts cache
Modified:
scripts/qa/qareport
Modified: scripts/qa/qareport
URL: http://svn.debian.org/wsvn/scripts/qa/qareport?rev=8984&op=diff
==============================================================================
--- scripts/qa/qareport (original)
+++ scripts/qa/qareport Wed Nov 7 18:17:36 2007
@@ -49,8 +49,7 @@
my $archsuit = $data->{archive}{$pkg}{most_recent_src} || 0;
my $uver = $data->{watch}{$pkg}{upstream_ver};
my $m_uver = $data->{watch}{$pkg}{upstream_mangled};
- my @bugs = @{$data->{bts}{$pkg}};
- @bugs = map({ "#$_" } @bugs);
+ my @bugs = map({ "#$_" } keys %{$data->{bts}{$pkg}});
my $status;
if(! $dver) {
More information about the Pkg-perl-cvs-commits
mailing list