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