fix #2525: encode notifications in UTF-8

[pmg-api.git] / src / PMG / RuleDB / Notify.pm

diff --git a/src/PMG/RuleDB/Notify.pm b/src/PMG/RuleDB/Notify.pm
index 860b5ce4e5f23041e704273de1294cb2c302014b..ec18a7e5eafc7669b18c0e6db24d8fb9c4893c4f 100644 (file)
--- a/src/PMG/RuleDB/Notify.pm
+++ b/src/PMG/RuleDB/Notify.pm
@@ -224,10 +224,12 @@ sub execute {
     $to =~ s/\s+/,/g;
 
     my $top = MIME::Entity->build(
+       Encoding    => 'quoted-printable',
+       Charset => 'UTF-8',
        From    => $from,
        To      => $to,
-       Subject => $subject,
-       Data => $body);
+       Subject => encode('UTF-8', $subject),
+       Data => encode('UTF-8', $body));
 
     if ($self->{attach} eq 'O') {
        # attach original mail