From 6d7bae7e02128e31871664a75a96b3eb5071494c Mon Sep 17 00:00:00 2001
From: "Bradley M. Kuhn" <bkuhn@ebb.org>
Date: Sun, 3 Jan 2016 12:26:49 -0800
Subject: [PATCH] Correct printout of email addresses for renewal.

---
 scripts/send-renewal-notices.plx | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/scripts/send-renewal-notices.plx b/scripts/send-renewal-notices.plx
index ed9d8e7..9facf70 100644
--- a/scripts/send-renewal-notices.plx
+++ b/scripts/send-renewal-notices.plx
@@ -53,7 +53,8 @@ foreach my $supporterId (@supporterIds) {
   open(SENDMAIL, "|/usr/lib/sendmail -f \"$FROM_ADDRESS\" -oi -oem -- $emailTo $FROM_ADDRESS") or
     die "unable to run sendmail: $!";
 
-  print "To: ", join(', ', keys %emails), "\n";
+  print STDERR "Sending to $supporterId at $emailTo\n";
+  print SENDMAIL "To: ", join(', ', keys %emails), "\n";
   print SENDMAIL @message;
 
   close SENDMAIL;