[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;