loncom/interface/lonmsg.pm - diff

Return to lonmsg.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.215, 2008/11/19 17:38:26	version 1.217, 2008/12/06 20:29:18
Line 430 sub sendemail {	Line 430 sub sendemail {
}	}
}	}
$body=	$body=
"*** ".&mt_user($user_lh,'This is an automatic message 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 message'):&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;
my $msg = new Mail::Send;	my $msg = new Mail::Send;
$msg->to($to);	$msg->to($to);
Line 1013 sub user_lang {	Line 1013 sub user_lang {
}	}
}	}
}	}
my @languages=&Apache::loncommon::get_genlanguages(@userlangs);	my @languages=&Apache::lonlocal::get_genlanguages(@userlangs);
my $user_lh = Apache::localize->get_handle(@languages);	my $user_lh = Apache::localize->get_handle(@languages);
return $user_lh;	return $user_lh;
}	}