version 1.9, 2008/10/03 23:37:27
|
version 1.10, 2008/10/04 00:09:18
|
Line 41 sub handler {
|
Line 41 sub handler {
|
if ($r->header_only) { |
if ($r->header_only) { |
return OK; |
return OK; |
} |
} |
my $start_page = |
|
&Apache::loncommon::start_page('Reset password','', |
|
{ |
|
'no_inline_link' => 1,}); |
|
$r->print($start_page); |
|
my $contact_name = &mt('LON-CAPA helpdesk'); |
my $contact_name = &mt('LON-CAPA helpdesk'); |
my $contact_email = $r->dir_config('lonSupportEMail'); |
my $contact_email = $r->dir_config('lonSupportEMail'); |
my $server = $r->dir_config('lonHostID'); |
my $server = $r->dir_config('lonHostID'); |
Line 58 sub handler {
|
Line 53 sub handler {
|
my $uname = &unescape($env{'form.uname'}); |
my $uname = &unescape($env{'form.uname'}); |
my $udom = $env{'form.udom'}; |
my $udom = $env{'form.udom'}; |
my $token = $env{'form.token'}; |
my $token = $env{'form.token'}; |
|
my $start_page = |
|
&Apache::loncommon::start_page('Reset password','', |
|
{ |
|
'no_inline_link' => 1,}); |
|
$r->print($start_page); |
$r->print(&mt('<h3>'.&mt('Reset forgotten LON-CAPA password').'</h3>')); |
$r->print(&mt('<h3>'.&mt('Reset forgotten LON-CAPA password').'</h3>')); |
my $output; |
my $output; |
if ($token) { |
if ($token) { |