[LON-CAPA-cvs] cvs: loncom /interface lonmsg.pm lonnotify.pm lonsupportreq.pm
bisitz
bisitz@source.lon-capa.org
Wed, 10 Nov 2010 14:44:51 -0000
bisitz Wed Nov 10 14:44:51 2010 EDT
Modified files:
/loncom/interface lonmsg.pm lonsupportreq.pm lonnotify.pm
Log:
Bug #5528:
Explicitly send character encoding UTF-8 in outgoing e-mail to ensure correct character display in user's e-mail client:
- Notification e-mails
- Broadcast e-mails (DC)
- Helpdesk requests
Character encoding of special chars in e-mail subject still dysfunctional (as before)
Index: loncom/interface/lonmsg.pm
diff -u loncom/interface/lonmsg.pm:1.229 loncom/interface/lonmsg.pm:1.230
--- loncom/interface/lonmsg.pm:1.229 Tue Nov 9 19:00:56 2010
+++ loncom/interface/lonmsg.pm Wed Nov 10 14:44:50 2010
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Routines for messaging
#
-# $Id: lonmsg.pm,v 1.229 2010/11/09 19:00:56 raeburn Exp $
+# $Id: lonmsg.pm,v 1.230 2010/11/10 14:44:50 bisitz Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -465,6 +465,7 @@
if ($senderaddress) {
$msg->add('From',$senderaddress);
}
+ $msg->add('Content-type','text/plain; charset=UTF-8');
if (my $fh = $msg->open()) {
print $fh $body;
$fh->close;
Index: loncom/interface/lonsupportreq.pm
diff -u loncom/interface/lonsupportreq.pm:1.57 loncom/interface/lonsupportreq.pm:1.58
--- loncom/interface/lonsupportreq.pm:1.57 Fri Jul 9 14:40:20 2010
+++ loncom/interface/lonsupportreq.pm Wed Nov 10 14:44:50 2010
@@ -1,5 +1,5 @@
#
-# $Id: lonsupportreq.pm,v 1.57 2010/07/09 14:40:20 raeburn Exp $
+# $Id: lonsupportreq.pm,v 1.58 2010/11/10 14:44:50 bisitz Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -754,6 +754,7 @@
if ($bcc ne '') {
$msg->add("Bcc" => $bcc);
}
+ $msg->add('Content-type','text/plain; charset=UTF-8');
if ($attachmentpath) {
my ($type, $encoding) = MIME::Types::by_suffix($attachmentpath);
Index: loncom/interface/lonnotify.pm
diff -u loncom/interface/lonnotify.pm:1.37 loncom/interface/lonnotify.pm:1.38
--- loncom/interface/lonnotify.pm:1.37 Fri Jul 9 14:40:20 2010
+++ loncom/interface/lonnotify.pm Wed Nov 10 14:44:50 2010
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Sending messages
#
-# $Id: lonnotify.pm,v 1.37 2010/07/09 14:40:20 raeburn Exp $
+# $Id: lonnotify.pm,v 1.38 2010/11/10 14:44:50 bisitz Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -742,6 +742,7 @@
$msg->to($to);
$msg->subject($subject);
$msg->add('From',"$from");
+ $msg->add('Content-type','text/plain; charset=UTF-8');
if (my $fh = $msg->open()) {
print $fh $message;
$fh->close;