loncom/interface/resetpw.pm - diff

Return to resetpw.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.23, 2010/02/19 15:41:40	version 1.25, 2010/11/09 16:40:21
Line 78 sub handler {	Line 78 sub handler {
my $udom = $env{'form.udom'};	my $udom = $env{'form.udom'};
my $token = $env{'form.token'};	my $token = $env{'form.token'};
my $start_page =	my $start_page =
&Apache::loncommon::start_page('Reset password','',	&Apache::loncommon::start_page('Reset password');
{
'no_inline_link' => 1,});
$r->print($start_page);	$r->print($start_page);
$r->print('<h3>'.&mt('Reset forgotten LON-CAPA password').'</h3>');	$r->print('<h3>'.&mt('Reset forgotten LON-CAPA password').'</h3>');
my $output;	my $output;
Line 218 sub send_mail {	Line 216 sub send_mail {
my $requestmail = "To: $email\n".	my $requestmail = "To: $email\n".
"From: $contact_name <$contact_email>\n".	"From: $contact_name <$contact_email>\n".
"Subject: ".&mt('Your LON-CAPA account')."\n".	"Subject: ".&mt('Your LON-CAPA account')."\n".
	"Content-type: text/plain\;charset=UTF-8\n".
"\n\n".$mailmsg."\n\n".	"\n\n".$mailmsg."\n\n".
&mt('[_1] LON-CAPA support team',$domdesc)."\n".	&mt('[_1] LON-CAPA support team',$domdesc)."\n".
"$contact_email\n";	"$contact_email\n";