Merge branch 'migrate_to_catalyst' of ssh://git.mysociety.org/data/git/public/fixmystreet into migrate_to_catalyst

1 files changed, 8 insertions, 5 deletions

diff --git a/perllib/FixMyStreet/App.pm b/perllib/FixMyStreet/App.pm
index 1d584accb..752263d10 100644
--- a/perllib/FixMyStreet/App.pm
+++ b/perllib/FixMyStreet/App.pm
@@ -278,8 +278,10 @@ sub send_email {
         from => FixMyStreet->config('CONTACT_EMAIL'),
         %{ $c->stash },
         %$extra_stash_values,
-        additional_template_paths =>
-          [ $c->cobrand->path_to_email_templates->stringify ]
+        additional_template_paths => [
+            FixMyStreet->path_to( 'templates', 'email', $c->cobrand->moniker, $c->stash->{lang_code} )->stringify,
+            FixMyStreet->path_to( 'templates', 'email', $c->cobrand->moniker )->stringify,
+        ]
     };
 
     # render the template
@@ -292,12 +294,13 @@ sub send_email {
 
     # pass the email into mySociety::Email to construct the on the wire 7bit
     # format - this should probably happen in the transport instead but hohum.
-    my $email_text = mySociety::Email::construct_email(
+    my $email_text = mySociety::Locale::in_gb_locale { mySociety::Email::construct_email(
         {
-            _unwrapped_body_ => $email->body,    # will get line wrapped
+            _template_ => $email->body,    # will get line wrapped
+            _parameters_ => {},
             $email->header_pairs
         }
-    );
+    ) };
 
     # send the email
     $c->model('EmailSend')->send($email_text);