--- loncom/auth/lonlogin.pm 2003/08/25 15:24:43 1.46 +++ loncom/auth/lonlogin.pm 2003/08/26 19:41:53 1.47 @@ -1,7 +1,7 @@ # The LearningOnline Network # Login Screen # -# $Id: lonlogin.pm,v 1.46 2003/08/25 15:24:43 www Exp $ +# $Id: lonlogin.pm,v 1.47 2003/08/26 19:41:53 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -109,7 +109,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; } } # ----------------------------------------------------------- Get announcements