--- nsdl/nsdlloncapaorg/lonlogin.pm 2003/07/28 20:30:21 1.2 +++ nsdl/nsdlloncapaorg/lonlogin.pm 2003/08/29 14:10:40 1.3 @@ -1,7 +1,7 @@ # The LearningOnline Network # Login Screen # -# $Id: lonlogin.pm,v 1.2 2003/07/28 20:30:21 www Exp $ +# $Id: lonlogin.pm,v 1.3 2003/08/29 14:10:40 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -104,7 +104,8 @@ sub handler { # ---------------------------------------- Are we access server and overloaded? if (($role eq 'access') && (($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