From 98026dd16dd823afb8a41b85f2bd4ae7356458e4 Mon Sep 17 00:00:00 2001 From: "Bradley M. Kuhn" Date: Fri, 2 Dec 2016 14:39:36 -0800 Subject: [PATCH] These two places should be $laspesSoon Only debugging output is impacted here, but it really should be based on the variable we're actually using in the next statement. --- scripts/send-renewal-notices.plx | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/scripts/send-renewal-notices.plx b/scripts/send-renewal-notices.plx index c3d5dc8..c0b74d5 100644 --- a/scripts/send-renewal-notices.plx +++ b/scripts/send-renewal-notices.plx @@ -97,14 +97,14 @@ foreach my $supporterId (@supporterIds) { if (defined $request) { if (defined $request->{fulfillDate}) { print STDERR "$supporterId lapsed on $expiresOn but recorded as renewed on $request->{fulfillDate}\n" - if ( ($isLapsed or $lapsesInOneWeek) and $VERBOSE); + if ( ($isLapsed or $lapsesSoon) and $VERBOSE); } else { print STDERR "$supporterId received this renewal notice already on $request->{requestDate}\n" if $VERBOSE; } next; } - print STDERR "$supporterId skipped since he is not lapsed\n" if ( (not $isLapsed and not $lapsesInOneWeek) and $VERBOSE > 1); + print STDERR "$supporterId skipped since he is not lapsed\n" if ( (not $isLapsed and not $lapsesSoon) and $VERBOSE > 1); next unless $isLapsed or $lapsesSoon;