From 3283cff2e1e62a1fa522a1d29ed3d118d0195e4e Mon Sep 17 00:00:00 2001
From: "Bradley M. Kuhn" <bkuhn@ebb.org>
Date: Mon, 2 Jan 2017 14:53:08 -0800
Subject: [PATCH] Correct variable name typo.

---
 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 5673400..69f9346 100644
--- a/scripts/send-renewal-notices.plx
+++ b/scripts/send-renewal-notices.plx
@@ -120,7 +120,7 @@ foreach my $supporterId (sort @supporterIds) {
 
   my $displayName = $sp->getDisplayName($supporterId);
   if ($isPaper) {
-    next unless $sp->paperMailOk($donorId);
+    next unless $sp->paperMailOk($supporterId);
     my $latexDisplayName = latex_encode($displayName);
     $latexDisplayName =~ s/\\unmatched\{0141\}/\L{}/g;
     $latexDisplayName =~ s/\\unmatched\{0142\}/\l{}/g;
@@ -159,7 +159,7 @@ foreach my $supporterId (sort @supporterIds) {
     close LETTER;
     close MESSAGE;
   } else {
-    next unless $sp->emailOk($donorId);
+    next unless $sp->emailOk($supporterId);
     open(MESSAGE, "<", $EMAIL_TEMPLATE);
     my @message;
     while (my $line = <MESSAGE> ) {