[LON-CAPA-cvs] cvs: loncom /auth lonauth.pm

[raeburn]

raeburn		Tue Aug  9 01:27:42 2011 EDT

  Modified files:              
    /loncom/auth	lonauth.pm 
  Log:
   - &lonnet::choose_server() returns an array.
  
  
Index: loncom/auth/lonauth.pm
diff -u loncom/auth/lonauth.pm:1.115 loncom/auth/lonauth.pm:1.116
--- loncom/auth/lonauth.pm:1.115	Sun Jun 12 14:18:09 2011
+++ loncom/auth/lonauth.pm	Tue Aug  9 01:27:42 2011
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # User Authentication Module
 #
-# $Id: lonauth.pm,v 1.115 2011/06/12 14:18:09 raeburn Exp $
+# $Id: lonauth.pm,v 1.116 2011/08/09 01:27:42 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -418,7 +418,7 @@
     if ($r->dir_config("lonBalancer") eq 'yes') {
         my $otherserver = &Apache::lonnet::spareserver(30000,undef,1,$form{'udom'});
         if (!$otherserver) { 
-            $otherserver = &Apache::lonnet::choose_server($form{'udom'});
+            ($otherserver) = &Apache::lonnet::choose_server($form{'udom'});
         }
         if ($otherserver) {
             &success($r,$form{'uname'},$form{'udom'},$authhost,'noredirect',undef,