2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-02-01 01:09:47 +00:00

75_MSG.pm: UTF8-Patch from gandy (Forum #36508)

git-svn-id: https://svn.fhem.de/fhem/trunk@8519 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2015-05-03 16:09:12 +00:00
parent 88ebc85508
commit 8a25bef34c

View File

@ -136,7 +136,7 @@ MSG_Set($@)
From => $from,
To => $to,
Subject => $subject,
Type => 'text/plain',
Type => 'text/plain; charset=UTF-8', #'multipart/mixed', # was 'text/plain'
Data => $mess
);
@ -144,7 +144,7 @@ MSG_Set($@)
my $smtp;
my $smtperrmsg = "SMTP Error: ";
$smtp = Net::SMTP::SSL->new($smtphost, Port=>$smtpport) or return $smtperrmsg . " Can't connect to host $smtphost";
$smtp->auth(@auth[0], @auth[1]) or return $smtperrmsg . " Can't authenticate: " . $smtp->message();
$smtp->auth($auth[0], $auth[1]) or return $smtperrmsg . " Can't authenticate: " . $smtp->message();
$smtp->mail($from) or return $smtperrmsg . $smtp->message();
$smtp->to($to) or return $smtperrmsg . $smtp->message();
if($cc ne '')