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

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