bugfix : ship utf-8 encoding in mail header

Signed-off-by: Joshua Ferraro <jmf@liblime.com>
This commit is contained in:
Paul POULAIN 2008-05-12 14:56:49 +02:00 committed by Joshua Ferraro
parent 4613c8f701
commit dfcdc73be6
6 changed files with 12 additions and 3 deletions

View File

@ -286,7 +286,8 @@ sub SendAlerts {
From => $borinfo->{email},
Subject => "" . $innerletter->{title},
Message => "" . $innerletter->{content},
);
'Content-Type' => 'text/plain; charset="utf8"',
);
sendmail(%mail);
# warn "sending to $mail{To} From $mail{From} subj $mail{Subject} Mess $mail{Message}";
@ -416,6 +417,7 @@ sub SendAlerts {
From => $userenv->{emailaddress},
Subject => "" . $innerletter->{title},
Message => "" . $innerletter->{content},
'Content-Type' => 'text/plain; charset="utf8"',
);
sendmail(%mail);
logaction(

View File

@ -427,7 +427,8 @@ sub ModStatus {
To => $emailinfo->{byemail},
From => $emailinfo->{libemail},
Subject => 'Koha suggestion',
Message => "".$template->output
Message => "".$template->output,
'Content-Type' => 'text/plain; charset="utf8"',
);
sendmail(%mail);
}

View File

@ -244,6 +244,7 @@ foreach my $branchcode (@branches) {
From => $emailaddress,
Subject => $mailtitle,
Message => $notice,
'Content-Type' => 'text/plain; charset="utf8"',
);
sendmail(%mail);
}
@ -271,6 +272,7 @@ foreach my $branchcode (@branches) {
From => $emailaddress,
Subject => 'Koha overdues',
Message => $notice,
'Content-Type' => 'text/plain; charset="utf8"',
);
sendmail(%mail);
}

View File

@ -134,6 +134,7 @@ while (($itemcount,$borrowernumber,$firstname,$lastname,$address1,$address2,$cit
From => $from,
Subject => $mailtitle,
Message => $notice,
'Content-Type' => 'text/plain; charset="utf8"',
);
sendmail(%mail);
}
@ -163,6 +164,7 @@ if ($count) {
From => $from,
Subject => 'Koha overdues',
Message => $notice,
'Content-Type' => 'text/plain; charset="utf8"',
);
sendmail(%mail);
}

View File

@ -101,6 +101,7 @@ my %mail = ( To => '$admin',
From => '$library',
Subject => 'Reserve problems',
Message => $message,
'Content-Type' => 'text/plain; charset="utf8"',
);
sendmail(%mail);

View File

@ -99,7 +99,8 @@ EOF
To => $updateemailaddress,
From => $updateemailaddress,
Subject => "User Request for update of Record.",
Message => $message
Message => $message,
'Content-Type' => 'text/plain; charset="utf8"',
);
if ( sendmail %mail ) {