version 1.127, 2009/10/06 23:43:21
|
version 1.128, 2009/10/21 12:29:40
|
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; |
} |
} |