![[BACK]](/icons/back.gif){kind=icon}
Return to lonauth.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / auth|
Return to lonauth.pm CVS log | Up to [LON-CAPA] / loncom / auth |
| version 1.112, 2011/05/13 01:33:02 | version 1.113, 2011/06/10 01:21:36 |
|---|---|
| Line 421 sub handler { | Line 421 sub handler { |
| if ($r->dir_config("lonBalancer") eq 'yes') { | if ($r->dir_config("lonBalancer") eq 'yes') { |
| &success($r,$form{'uname'},$form{'udom'},$authhost,'noredirect',undef, | &success($r,$form{'uname'},$form{'udom'},$authhost,'noredirect',undef, |
| \%form); | \%form); |
| my ($otherserver) = &Apache::lonnet::choose_server($form{'udom'}); | my $otherserver = &Apache::lonnet::spareserver(30000,undef,1,$form{'udom'}); |
| $r->internal_redirect('/adm/switchserver?otherserver='.$otherserver.'&origurl='.$firsturl); | $r->internal_redirect('/adm/switchserver?otherserver='.$otherserver.'&origurl='.$firsturl); |
| return OK; | return OK; |
| } else { | } else { |