$lt{'wel'}
$welcome
$loginhelp
-$remoteinfo
-$maincall
$continuelink
$end_page
ENDSUCCESS
@@ -206,19 +196,18 @@ sub failed {
my $end_page = &Apache::loncommon::end_page();
&Apache::loncommon::content_type($r,'text/html');
$r->send_http_header;
- my @actions =
- (&mt('Please [_1]log in again[_2].','',''));
my $loginhelp = &loginhelpdisplay($udom);
if ($loginhelp) {
- push(@actions, ''.&mt('Login problems?').'');
+ $loginhelp = ''.&mt('Login problems?').'
';
}
- #FIXME: link to helpdesk might be added here
$r->print(
$start_page
- .''.&mt('Sorry ...').'
'
- .&Apache::lonhtmlcommon::confirm_success(&mt($message),1).'
'
- .&Apache::lonhtmlcommon::actionbox(\@actions)
+ .''.&mt('Sorry ...').'
'
+ .''.&mt($message).'
'
+ .''.&mt('Please [_1]log in again[_2].','','')
+ .'
'
+ .$loginhelp
.$end_page
);
}
@@ -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 =