|
version 1.21, 2002/08/28 19:42:48
|
version 1.22, 2002/09/17 19:45:11
|
|
Line 77 sub handler {
|
Line 77 sub handler {
|
| my $otherserver='http://'.$ENV{'SERVER_NAME'}; |
my $otherserver='http://'.$ENV{'SERVER_NAME'}; |
| my $firsturl=$ENV{'request.firsturl'}; |
my $firsturl=$ENV{'request.firsturl'}; |
| # ---------------------------------------- Are we access server and overloaded? |
# ---------------------------------------- Are we access server and overloaded? |
| if (($role eq 'access') && ($loadpercent>100.0)) { |
if (($loadpercent>100.0)) { |
| $otherserver=Apache::lonnet::spareserver(); |
$otherserver=Apache::lonnet::spareserver($loadpercent); |
| } |
} |
| |
|
| # -------------------------------------------------------- Set login parameters |
# -------------------------------------------------------- Set login parameters |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonlogin.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / auth