version 1.94, 2007/08/30 22:07:45
|
version 1.94.2.1, 2007/10/09 16:48:51
|
Line 158 ENDFAILED
|
Line 158 ENDFAILED
|
my $otherserver= &Apache::lonnet::absolute_url($host_name); |
my $otherserver= &Apache::lonnet::absolute_url($host_name); |
my $firsturl= |
my $firsturl= |
($env{'request.firsturl'}?$env{'request.firsturl'}:$env{'form.firsturl'}); |
($env{'request.firsturl'}?$env{'request.firsturl'}:$env{'form.firsturl'}); |
# ---------------------------------------- Are we access server and overloaded? |
# ---------------------------------------------------------- Are we overloaded? |
if (($role eq 'access') && |
if ((($userloadpercent>100.0)||($loadpercent>100.0))) { |
(($userloadpercent>100.0)||($loadpercent>100.0))) { |
|
my $unloaded=Apache::lonnet::spareserver($loadpercent,$userloadpercent); |
my $unloaded=Apache::lonnet::spareserver($loadpercent,$userloadpercent); |
if ($unloaded) { $otherserver=$unloaded; } |
if ($unloaded) { $otherserver=$unloaded; } |
} |
} |