Skip lapsed supporters.

This commit is contained in:
Bradley M. Kuhn 2016-01-22 17:12:05 -08:00
parent 922e8f279e
commit 376075e549

View file

@ -50,6 +50,9 @@ foreach my $supporterId (@supporterIds) {
}
next;
}
print STDERR "$supporterId skipped since he is not lapsed\n" if ( (not $isLapsed) and $VERBOSE > 1);
next if not $isLapsed;
my %emails;
my $email = $sp->getPreferredEmailAddress($supporterId);
if (defined $email) {