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;
_______________________________________________
Collab-qa-commits mailing list
[email protected]
http://lists.alioth.debian.org/mailman/listinfo/collab-qa-commits
