nsdl/nsdlloncapaorg/lonlogin.pm - diff

Return to lonlogin.pm CVS log

Up to [LON-CAPA] / nsdl / nsdlloncapaorg

version 1.2, 2003/07/28 20:30:21	version 1.3, 2003/08/29 14:10:40
Line 104 sub handler {	Line 104 sub handler {
# ---------------------------------------- Are we access server and overloaded?	# ---------------------------------------- Are we access server and overloaded?
if (($role eq 'access') &&	if (($role eq 'access') &&
(($userloadpercent>100.0)\|\|($loadpercent>100.0))) {	(($userloadpercent>100.0)\|\|($loadpercent>100.0))) {
$otherserver=Apache::lonnet::spareserver($loadpercent,$userloadpercent);	my $unloaded=Apache::lonnet::spareserver($loadpercent,$userloadpercent);
	if ($unloaded) { $otherserver=$unloaded; }
}	}

# -------------------------------------------------------- Set login parameters	# -------------------------------------------------------- Set login parameters