--- loncom/interface/lonsupportreq.pm 2011/03/03 00:06:38 1.64 +++ loncom/interface/lonsupportreq.pm 2011/03/03 00:33:38 1.65 @@ -1,5 +1,5 @@ # -# $Id: lonsupportreq.pm,v 1.64 2011/03/03 00:06:38 raeburn Exp $ +# $Id: lonsupportreq.pm,v 1.65 2011/03/03 00:33:38 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -774,7 +774,8 @@ END if ($bcc ne '') { $msg->add("Bcc" => $bcc); } - $msg->add('Content-type','text/plain; charset=UTF-8'); + $msg->attr("content-type" => "text/plain"); + $msg->attr("content-type.charset" => "UTF-8"); if ($attachmentpath) { my ($type, $encoding) = MIME::Types::by_suffix($attachmentpath);