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; | ||||
|   } | ||||
|   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) { | ||||
|  |  | |||
		Loading…
	
	Add table
		
		Reference in a new issue
	
	 Bradley M. Kuhn
						Bradley M. Kuhn