loncom/interface/lonmsg.pm - diff

Return to lonmsg.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.224, 2009/03/31 21:04:12	version 1.225, 2010/03/02 15:10:47
Line 453 sub sendemail {	Line 453 sub sendemail {
"*** ".&mt_user($user_lh,'This is an automatic e-mail generated by the LON-CAPA system.')."\n".	"*** ".&mt_user($user_lh,'This is an automatic e-mail generated by the LON-CAPA system.')."\n".
"* ".($senderaddress?&mt_user($user_lh,'You can reply to this e-mail'):&mt_user($user_lh,'Please do not reply to this address.')."\n* ".	"* ".($senderaddress?&mt_user($user_lh,'You can reply to this e-mail'):&mt_user($user_lh,'Please do not reply to this address.')."\n* ".
&mt_user($user_lh,'A reply will not be received by the recipient!'))."\n\n".$body;	&mt_user($user_lh,'A reply will not be received by the recipient!'))."\n\n".$body;

	$body =~ s/ / /g;

my $msg = new Mail::Send;	my $msg = new Mail::Send;
$msg->to($to);	$msg->to($to);
$msg->subject('[LON-CAPA] '.$subject);	$msg->subject('[LON-CAPA] '.$subject);