Skip lapsed supporters.
This commit is contained in:
parent
922e8f279e
commit
376075e549
1 changed files with 3 additions and 0 deletions
|
@ -50,6 +50,9 @@ foreach my $supporterId (@supporterIds) {
|
||||||
}
|
}
|
||||||
next;
|
next;
|
||||||
}
|
}
|
||||||
|
print STDERR "$supporterId skipped since he is not lapsed\n" if ( (not $isLapsed) and $VERBOSE > 1);
|
||||||
|
next if not $isLapsed;
|
||||||
|
|
||||||
my %emails;
|
my %emails;
|
||||||
my $email = $sp->getPreferredEmailAddress($supporterId);
|
my $email = $sp->getPreferredEmailAddress($supporterId);
|
||||||
if (defined $email) {
|
if (defined $email) {
|
||||||
|
|
Loading…
Reference in a new issue