status-report-scripts parseBZbugList,1.77,1.78

[Christian Iseli (c4chris)]

Author: c4chris

Update of /cvs/fedora/status-report-scripts
In directory cvs-int.fedora.redhat.com:/tmp/cvs-serv11937

Modified Files:
	parseBZbugList 
Log Message:
Fix obsoleted email address


Index: parseBZbugList
===================================================================
RCS file: /cvs/fedora/status-report-scripts/parseBZbugList,v
retrieving revision 1.77
retrieving revision 1.78
diff -u -r1.77 -r1.78
--- parseBZbugList	5 Jul 2007 20:54:26 -0000	1.77
+++ parseBZbugList	5 Jul 2007 21:05:09 -0000	1.78
@@ -150,6 +150,11 @@
 for my $flag ('+', '-', '?', ' ') {
   my $bA = &runQuery($rpc, $flag);
   foreach my $bug (@$bA) {
+    # Special case scop
+    $bug->{'assigned_to'} = 'ville.skytta at iki.fi'
+      if $bug->{'assigned_to'} eq 'scop at fedoraproject.org';
+    $bug->{'reporter'} = 'ville.skytta at iki.fi'
+      if $bug->{'reporter'} eq 'scop at fedoraproject.org';
     warn "assigned_to should be an email address: " . $bug->{'assigned_to'}
       if index($bug->{'assigned_to'}, "@") < 0;
     warn "reporter should be an email address: " . $bug->{'reporter'}
@@ -320,6 +325,11 @@
   print STDERR "Running runQueryOpenBugs at $i\n";
   my $bA = &runQueryOpenBugs($rpc, \@A);
   foreach my $bug (@$bA) {
+    # Special case scop
+    $bug->{'assigned_to'} = 'ville.skytta at iki.fi'
+      if $bug->{'assigned_to'} eq 'scop at fedoraproject.org';
+    $bug->{'reporter'} = 'ville.skytta at iki.fi'
+      if $bug->{'reporter'} eq 'scop at fedoraproject.org';
     warn "assigned_to should be an email address: " . $bug->{'assigned_to'}
       if index($bug->{'assigned_to'}, "@") < 0;
     warn "reporter should be an email address: " . $bug->{'reporter'}