'.&mt($message).'
' + .''.&mt('Please [_1]log in again[_2].','','') + .'
' + .$loginhelp .$end_page ); } @@ -321,7 +310,7 @@ sub handler { my %sessiondata; if ($form{'iptoken'}) { %sessiondata = &Apache::lonnet::tmpget($form{'iptoken'}); - my $delete = &Apache::lonnet::tmpdel($form{'iptoken'}); + my $delete = &Apache::lonnet::tmpdel($form{'token'}); } if (($tmpinfo=~/^error/) || ($tmpinfo eq 'con_lost') || @@ -407,8 +396,7 @@ sub handler { return OK; } my $start_page = - &Apache::loncommon::start_page('Create a user account in LON-CAPA', - '',{'no_inline_link' => 1,}); + &Apache::loncommon::start_page('Create a user account in LON-CAPA'); my $lonhost = $r->dir_config('lonHostID'); my $origmail = $Apache::lonnet::perlvar{'lonSupportEMail'}; my $contacts =