[LON-CAPA-cvs] cvs: loncom(version_2_5_X) /auth lonlogin.pm

[albertel]

albertel		Tue Oct  9 12:48:51 2007 EDT

  Modified files:              (Branch: version_2_5_X)
    /loncom/auth	lonlogin.pm 
  Log:
  - backport 1.97
  
  
Index: loncom/auth/lonlogin.pm
diff -u loncom/auth/lonlogin.pm:1.94 loncom/auth/lonlogin.pm:1.94.2.1
--- loncom/auth/lonlogin.pm:1.94	Thu Aug 30 18:07:45 2007
+++ loncom/auth/lonlogin.pm	Tue Oct  9 12:48:51 2007
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Login Screen
 #
-# $Id: lonlogin.pm,v 1.94 2007/08/30 22:07:45 albertel Exp $
+# $Id: lonlogin.pm,v 1.94.2.1 2007/10/09 16:48:51 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -158,9 +158,8 @@
     my $otherserver= &Apache::lonnet::absolute_url($host_name);
     my $firsturl=
     ($env{'request.firsturl'}?$env{'request.firsturl'}:$env{'form.firsturl'});
-# ---------------------------------------- Are we access server and overloaded?
-    if (($role eq 'access') &&
-	(($userloadpercent>100.0)||($loadpercent>100.0))) {
+# ---------------------------------------------------------- Are we overloaded?
+    if ((($userloadpercent>100.0)||($loadpercent>100.0))) {
         my $unloaded=Apache::lonnet::spareserver($loadpercent,$userloadpercent);
 	if ($unloaded) { $otherserver=$unloaded; }
     }