diff options
author | M Somerville <matthew-github@dracos.co.uk> | 2020-10-15 21:57:06 +0100 |
---|---|---|
committer | M Somerville <matthew-github@dracos.co.uk> | 2020-10-16 09:00:00 +0100 |
commit | 3227d1b61693022f6cf0efa790449182efb25784 (patch) | |
tree | 13fba3f17c550d6375256b4e691e976a5a0f2f94 /perllib | |
parent | 6dffdeb335030fa7f2ccf7ce70713bef9894cfea (diff) |
Fix issue with unicode in extra in alert emails.
Diffstat (limited to 'perllib')
-rw-r--r-- | perllib/FixMyStreet/Template.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/Template.pm b/perllib/FixMyStreet/Template.pm index bc087de9a..afb977ac9 100644 --- a/perllib/FixMyStreet/Template.pm +++ b/perllib/FixMyStreet/Template.pm @@ -175,6 +175,7 @@ sub email_sanitize_text : Fn('email_sanitize_text') { my $text = $update->{item_text}; my $extra = $update->{item_extra}; + utf8::encode($extra) if $extra; $extra = $extra ? RABX::wire_rd(new IO::String($extra)) : {}; my $staff = $extra->{is_superuser} || $extra->{is_body_user}; @@ -234,6 +235,7 @@ sub email_sanitize_html : Fn('email_sanitize_html') { my $text = $update->{item_text}; my $extra = $update->{item_extra}; + utf8::encode($extra) if $extra; $extra = $extra ? RABX::wire_rd(new IO::String($extra)) : {}; my $staff = $extra->{is_superuser} || $extra->{is_body_user}; |