$lt{'wel'}
$welcome
$loginhelp
-$remoteinfo
-$maincall
$continuelink
$end_page
ENDSUCCESS
@@ -183,18 +173,13 @@ sub failed {
my $end_page = &Apache::loncommon::end_page();
&Apache::loncommon::content_type($r,'text/html');
$r->send_http_header;
- my $loginhelp = &loginhelpdisplay($form->{'udom'});
- if ($loginhelp) {
- $loginhelp = ''.&mt('Login problems?').'
';
- }
-
$r->print(
$start_page
.''.&mt('Sorry ...').'
'
.''.&mt($message).'
'
.''.&mt('Please [_1]log in again[_2].','','')
.'
'
- .$loginhelp
+ .''.&mt('Login problems?').'
'
.$end_page
);
}
@@ -205,9 +190,9 @@ sub reroute {
my ($r) = @_;
&Apache::loncommon::content_type($r,'text/html');
$r->send_http_header;
- my $msg=''.&mt('Sorry ...').'
'
+ my $msg=''.&mt('Sorry ...').'
'
.&mt('Please [_1]log in again[_2].');
- &Apache::loncommon::simple_error_page($r,'Rerouting',$msg,{'no_auto_mt_msg' => 1});
+ &Apache::loncommon::simple_error_page($r,'Rerouting',$msg);
}
# ---------------------------------------------------------------- Main handler
@@ -246,7 +231,7 @@ sub handler {
}
$r->print(
$start_page
- .''.&mt('You are already logged in!').'
'
+ .''
.'
'.&mt('Please either [_1]continue the current session[_2] or [_3]log out[_4].'
,'','','','')
.'
'
@@ -377,8 +362,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 =