[Collab-qa-commits] r1540 - udd/udd

[Lucas Nussbaum]

Author: lucas
Date: 2009-07-24 17:49:32 +0000 (Fri, 24 Jul 2009)
New Revision: 1540

Modified:
   udd/udd/bugs_gatherer.pl
Log:
handle bugs without submitter

Modified: udd/udd/bugs_gatherer.pl
===================================================================
--- udd/udd/bugs_gatherer.pl	2009-07-24 14:40:23 UTC (rev 1539)
+++ udd/udd/bugs_gatherer.pl	2009-07-24 17:49:32 UTC (rev 1540)
@@ -218,9 +218,14 @@
 
 		# split emails
 		my (@addr, $submitter_name, $submitter_email, $owner_name, $owner_email, $done_name, $done_email);
-		@addr = Mail::Address->parse($bug{originator});
-		$submitter_name = $addr[0]->phrase;
-		$submitter_email = $addr[0]->address;
+		if ($bug{originator}) {
+			@addr = Mail::Address->parse($bug{originator});
+			$submitter_name = $addr[0]->phrase;
+			$submitter_email = $addr[0]->address;
+		} else {
+			$submitter_name = '';
+			$submitter_email = '';
+		}
 
 		if ($bug{owner}) {
 			@addr = Mail::Address->parse($bug{owner});