[Collab-qa-commits] r323 - tools/bugs2packagelist

[abi at alioth.debian.org]

Author: abi
Date: 2007-07-10 10:01:06 +0000 (Tue, 10 Jul 2007)
New Revision: 323

Modified:
   tools/bugs2packagelist/bts2pkglist.pl
Log:
...

Modified: tools/bugs2packagelist/bts2pkglist.pl
===================================================================
--- tools/bugs2packagelist/bts2pkglist.pl	2007-07-10 09:54:51 UTC (rev 322)
+++ tools/bugs2packagelist/bts2pkglist.pl	2007-07-10 10:01:06 UTC (rev 323)
@@ -38,7 +38,7 @@
 
 my $hdl = $c->get_usertag($user_mail,  $user_tag) or die 'something bad happened';
 my $bugs = $hdl->result;
-my $l = $bugs->{'qa-doublebuild'};
+my $l = $bugs->{$user_tag};
 
 if( @$l < 1 ) {
 	print "No bugs for user ($user_mail) and tag ($user_tag) found";