version 1.127, 2009/10/06 23:43:21
|
version 1.129, 2009/10/23 16:14:36
|
Line 117 sub handler {
|
Line 117 sub handler {
|
if ($lonhost ne '') { |
if ($lonhost ne '') { |
my $loginvia = $domconfhash{$domain.'.login.loginvia_'.$lonhost}; |
my $loginvia = $domconfhash{$domain.'.login.loginvia_'.$lonhost}; |
if (($loginvia ne '') && ($loginvia ne $lonhost)) { |
if (($loginvia ne '') && ($loginvia ne $lonhost)) { |
my %servers = &Apache::lonnet::get_servers($domain); |
if (&Apache::lonnet::hostname($loginvia) ne '') { |
if ($servers{$loginvia} ne '') { |
|
$r->print(&redirect_page($loginvia)); |
$r->print(&redirect_page($loginvia)); |
return OK; |
return OK; |
} |
} |
Line 338 $r->print(&Apache::loncommon::start_page
|
Line 337 $r->print(&Apache::loncommon::start_page
|
# ----------------------------------------------------------------------- Texts |
# ----------------------------------------------------------------------- Texts |
|
|
my %lt=&Apache::lonlocal::texthash( |
my %lt=&Apache::lonlocal::texthash( |
'un' => 'Username', |
'un' => 'Username', |
'pw' => 'Password', |
'pw' => 'Password', |
'dom' => 'Domain', |
'dom' => 'Domain', |
'perc' => 'percent', |
'perc' => 'percent', |
'load' => 'Server Load', |
'load' => 'Server Load', |
'userload' => 'User Load', |
'userload' => 'User Load', |
'catalog' => 'Course Catalog', |
'catalog' => 'Course/Community Catalog', |
'log' => 'Log in', |
'log' => 'Log in', |
'help' => 'Log-in Help', |
'help' => 'Log-in Help', |
'serv' => 'Server', |
'serv' => 'Server', |
'servadm' => 'Server Administration', |
'servadm' => 'Server Administration', |
'helpdesk' => 'Contact Helpdesk', |
'helpdesk' => 'Contact Helpdesk', |
'forgotpw' => 'Forgot password?', |
'forgotpw' => 'Forgot password?', |
'newuser' => 'New User?', |
'newuser' => 'New User?', |
); |
); |
# -------------------------------------------------- Change password field name |
# -------------------------------------------------- Change password field name |
my $forgotpw = &forgotpwdisplay(%lt); |
my $forgotpw = &forgotpwdisplay(%lt); |
my $loginhelp = &loginhelpdisplay(%lt); |
my $loginhelp = &loginhelpdisplay(%lt); |