Revision e3159b22
Von Moritz Bunkus vor mehr als 7 Jahren hinzugefügt
| scripts/task_server.pl | ||
|---|---|---|
| 17 | 17 |
use Daemon::Generic; |
| 18 | 18 |
use Data::Dumper; |
| 19 | 19 |
use DateTime; |
| 20 |
use Encode qw(); |
|
| 21 | 20 |
use English qw(-no_match_vars); |
| 22 | 21 |
use File::Spec; |
| 23 | 22 |
use List::MoreUtils qw(any); |
| ... | ... | |
| 158 | 157 |
EVAL_PERL => 0, |
| 159 | 158 |
ABSOLUTE => 1, |
| 160 | 159 |
CACHE_SIZE => 0, |
| 160 |
ENCODING => 'utf8', |
|
| 161 | 161 |
}); |
| 162 | 162 |
|
| 163 | 163 |
return debug("Could not create Template instance") unless $template;
|
| ... | ... | |
| 174 | 174 |
subject => $cfg->{email_subject},
|
| 175 | 175 |
content_type => 'text/plain', |
| 176 | 176 |
charset => 'utf-8', |
| 177 |
message => Encode::decode('utf-8', $body),
|
|
| 177 |
message => $body,
|
|
| 178 | 178 |
)->send; |
| 179 | 179 |
|
| 180 | 180 |
1; |
Auch abrufbar als: Unified diff
Task-Server & FailedBackgroundJobsReport: Encoding des E-Mail-Bodys gefixt
SL::Mailer erwartet die Einträge in Perls internem Encoding. Daher ist
jegliche Verwendung von Encode::decode(…) falsch.
Zusätzlich muss aber dem Template-Toolkit mitegeteilt werden, dass die
E-Mail-Vorlagen-Datei bereits UTF-8 encodiert wird. Nur dann wandelt
Template die beim Lesen ins interne Encoding um.
Damit spielt nun alles richtig zusammen:
• Daten aus der DB werden vom DB-Treiber in Perls internes Encoding
gewandelt.
• Die E-Mail-Vorlagendatei wird von Template in Perls internes
Encoding gewandelt.
• Beim Verschicken wird Perls internes Encoding von Net::SMTP (oder
welchem Modul auch letztlich genutzt wird) aus Perls internem
Encoding in das Wire-Format gewandelt.
Behebt #257.