[Collab-qa-commits] r870 - svnbuildstat/trunk/script

[goneri at alioth.debian.org]

Author: goneri
Date: 2008-05-31 23:35:28 +0000 (Sat, 31 May 2008)
New Revision: 870

Modified:
   svnbuildstat/trunk/script/svnbuildstat_update-bugs.pl
Log:
also save the bugState

Modified: svnbuildstat/trunk/script/svnbuildstat_update-bugs.pl
===================================================================
--- svnbuildstat/trunk/script/svnbuildstat_update-bugs.pl	2008-05-30 22:44:56 UTC (rev 869)
+++ svnbuildstat/trunk/script/svnbuildstat_update-bugs.pl	2008-05-31 23:35:28 UTC (rev 870)
@@ -42,11 +42,13 @@
 #      if (!($h{debbugsTag} && $h{debbugsTag} =~ /(pending|wontfix|unreproducible|moreinfo)/)&& $h{debbugsState} =~ /open/) {
 
       my $sourcepackage = $schema->resultset('Sourcepackage')->search({name => $h{debbugsSourcePackage}})->first;
-      my $severity = $schema->resultset('Bugseverity')->find_or_create({name=>$h{debbugsSeverity}});
+      my $bugseverity = $schema->resultset('Bugseverity')->find_or_create({name=>$h{debbugsSeverity}});
+      my $bugstate = $schema->resultset('Bugstate')->find_or_create({name=>$h{debbugsState}});
       my $bug = $schema->resultset('Bug')->find_or_create({id => $h{debbugsID}});
 
-      $bug->bugseverity_id ($severity->id);
+      $bug->bugseverity_id ($bugseverity->id);
       $bug->sourcepackage_id ($sourcepackage->id);
+      $bug->bugstate_id ($bugstate->id);
       $bug->name ($h{debbugsTitle});
       $bug->update;