diff --git a/scripts/send-supporter-emails-by-category.plx b/scripts/send-supporter-emails-by-category.plx index b93cee5..185771e 100644 --- a/scripts/send-supporter-emails-by-category.plx +++ b/scripts/send-supporter-emails-by-category.plx @@ -163,9 +163,11 @@ foreach my $id (@supporterIds) { open(my $sendmailFH, "|-", '/usr/lib/sendmail', '-f', $FROM_ADDDRESS, '-oi', '-oem', '--', @emails); - print $sendmailFH "To: $fullEmailLine\n"; - print $sendmailFH @{$groupLines{$group}}; + foreach my $line (@{$groupLines{$group}}) { + s/FIXME_DISPLAYNAME/$displayName/g; + print $sendmailFH $line; + } close $sendmailFH; usleep(60000); $groupCounts{$group}++;