aboutsummaryrefslogtreecommitdiffstats
path: root/perllib/FixMyStreet/App.pm
diff options
context:
space:
mode:
authorMatthew Somerville <matthew@mysociety.org>2011-06-07 16:28:47 +0100
committerMatthew Somerville <matthew@mysociety.org>2011-06-07 16:28:47 +0100
commit988fa9695dc0446887a30d6489786ab1323363c4 (patch)
tree14f7699629ef01c585b35be90ea409ab4432b9d8 /perllib/FixMyStreet/App.pm
parent0631d9409905fbfb9118ca20553e7f7de062abe6 (diff)
Improve email headers in emails sent.
Diffstat (limited to 'perllib/FixMyStreet/App.pm')
-rw-r--r--perllib/FixMyStreet/App.pm6
1 files changed, 5 insertions, 1 deletions
diff --git a/perllib/FixMyStreet/App.pm b/perllib/FixMyStreet/App.pm
index 10e0dbb28..ec7ec3ff0 100644
--- a/perllib/FixMyStreet/App.pm
+++ b/perllib/FixMyStreet/App.pm
@@ -275,9 +275,13 @@ sub send_email {
my $template = shift;
my $extra_stash_values = shift || {};
+ my $sender = $c->cobrand->contact_email;
+ my $sender_name = $c->cobrand->contact_name;
+ $sender =~ s/team/fms-DO-NOT-REPLY/;
+
# create the vars to pass to the email template
my $vars = {
- from => FixMyStreet->config('CONTACT_EMAIL'),
+ from => [ $sender, _($sender_name) ],
%{ $c->stash },
%$extra_stash_values,
additional_template_paths => [