From 7361516252a4d98620f66318cabe75acb3291efb Mon Sep 17 00:00:00 2001
From: Matthew Somerville <matthew-github@dracos.co.uk>
Date: Thu, 9 Mar 2017 10:43:27 +0000
Subject: Remove duplicate <> around envelope senders.

---
 perllib/FixMyStreet/SendReport/Email.pm | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

(limited to 'perllib/FixMyStreet/SendReport/Email.pm')

diff --git a/perllib/FixMyStreet/SendReport/Email.pm b/perllib/FixMyStreet/SendReport/Email.pm
index 5a287a208..8fedc48b5 100644
--- a/perllib/FixMyStreet/SendReport/Email.pm
+++ b/perllib/FixMyStreet/SendReport/Email.pm
@@ -88,10 +88,7 @@ sub send {
 
     $params->{Bcc} = $self->bcc if @{$self->bcc};
 
-    my $sender = sprintf('<fms-%s@%s>',
-        FixMyStreet::Email::generate_verp_token('report', $row->id),
-        FixMyStreet->config('EMAIL_DOMAIN')
-    );
+    my $sender = FixMyStreet::Email::unique_verp_id('report', $row->id);
 
     if (FixMyStreet::Email::test_dmarc($params->{From}[0])) {
         $params->{'Reply-To'} = [ $params->{From} ];
-- 
cgit v1.2.3