loncom/interface/resetpw.pm - diff

Return to resetpw.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.26, 2010/11/29 19:15:14	version 1.27, 2012/02/16 22:18:07
Line 66 sub handler {	Line 66 sub handler {
return OK;	return OK;
}	}
my $contact_name = &mt('LON-CAPA helpdesk');	my $contact_name = &mt('LON-CAPA helpdesk');
my $contact_email = $r->dir_config('lonSupportEMail');	my $origmail = $r->dir_config('lonSupportEMail');
my $server = $r->dir_config('lonHostID');	my $server = $r->dir_config('lonHostID');
my $defdom = &Apache::lonnet::default_login_domain();	my $defdom = &Apache::lonnet::default_login_domain();
	my $contacts =
	&Apache::loncommon::build_recipient_list(undef,'helpdeskmail',
	$defdom,$origmail);
	my ($contact_email) = split(',',$contacts);
my $handle = &Apache::lonnet::check_for_valid_session($r);	my $handle = &Apache::lonnet::check_for_valid_session($r);
my $lonidsdir=$r->dir_config('lonIDsDir');	my $lonidsdir=$r->dir_config('lonIDsDir');
if ($handle ne '') {	if ($handle ne '') {