Allow through reply-to header in send_email.

This might be used now by e.g. the contact form.

1 files changed, 1 insertions, 1 deletions

diff --git a/perllib/FixMyStreet/App.pm b/perllib/FixMyStreet/App.pm
index 013f47a29..8883bb91f 100644
--- a/perllib/FixMyStreet/App.pm
+++ b/perllib/FixMyStreet/App.pm
@@ -322,7 +322,7 @@ sub send_email {
     # create an email - will parse headers out of content
     my $email = Email::Simple->new($content);
     $email->header_set( ucfirst($_), $vars->{$_} )
-      for grep { $vars->{$_} } qw( to from subject);
+      for grep { $vars->{$_} } qw( to from subject Reply-To);
 
     return if $c->is_abuser( $email->header('To') );