X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Debbugs%2FDB%2FLoad.pm;h=1af6c6517162517e3afa757f6ba01e8580178395;hb=e0e2e093dbab85fafa41c4549483aa744fc68014;hp=d3019830e7b48d02e1e4482523c66829c7ac85b6;hpb=2c7097331efd1a76259be78075112ec15eea1023;p=debbugs.git

diff --git a/Debbugs/DB/Load.pm b/Debbugs/DB/Load.pm
index d301983..1af6c65 100644
--- a/Debbugs/DB/Load.pm
+++ b/Debbugs/DB/Load.pm
@@ -404,9 +404,11 @@ sub load_bug_log {
 	    my @cors;
 	    for my $type (keys %corr) {
 		for my $addr (@{$corr{$type}}) {
+                    my $cor = $s->resultset('Correspondent')->
+                        get_correspondent_id($addr);
+                    next unless defined $cor;
 		    push @cors,
-			{correspondent => $s->resultset('Correspondent')->
-			 get_correspondent_id($addr),
+			{correspondent => $cor,
 			 correspondent_type => $type,
 			};
 		}
@@ -414,7 +416,8 @@ sub load_bug_log {
 	    $m->update();
 	    $s->txn_do(sub {
 			   $m->message_correspondents()->delete();
-			   $m->add_to_message_correspondents(@cors);
+			   $m->add_to_message_correspondents(@cors) if
+                               @cors;
 		       }
 		      );
 	}