X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Debbugs%2FMail.pm;h=9fa282b1b53689447621513908d3092d57ebc65b;hb=55e320bcc73b6ef5c40b70d02dc69049a7e4c1e8;hp=d26c860a612f5866576e56944e5c2c529e7eda0c;hpb=6a73e0711f415272485b897db630fb254a84dd29;p=debbugs.git

diff --git a/Debbugs/Mail.pm b/Debbugs/Mail.pm
index d26c860..9fa282b 100644
--- a/Debbugs/Mail.pm
+++ b/Debbugs/Mail.pm
@@ -49,6 +49,7 @@ use Debbugs::MIME qw(encode_rfc1522);
 use Debbugs::Config qw(:config);
 use Params::Validate qw(:types validate_with);
 use Encode qw(encode is_utf8);
+use Debbugs::UTF8 qw(encode_utf8_safely);
 
 use Debbugs::Packages;
 
@@ -398,7 +399,7 @@ sub encode_headers{
 
      my ($header,$body) = split /\n\n/, $message, 2;
      $header = encode_rfc1522($header);
-     return $header . qq(\n\n). $body;
+     return $header . qq(\n\n). encode_utf8_safely($body);
 }
 
 =head2 rfc822_date