--- loncom/auth/switchserver.pm 2007/03/01 23:14:12 1.12 +++ loncom/auth/switchserver.pm 2007/03/02 23:17:48 1.13 @@ -1,7 +1,7 @@ # The LearningOnline Network # Switch Servers Handler # -# $Id: switchserver.pm,v 1.12 2007/03/01 23:14:12 albertel Exp $ +# $Id: switchserver.pm,v 1.13 2007/03/02 23:17:48 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -68,10 +68,10 @@ sub handler { &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'}, ['otherserver','role']); - my $switch_to=$Apache::lonnet::hostname{$env{'form.otherserver'}}; + my $switch_to=&Apache::lonnet::hostname($env{'form.otherserver'}); if (!$env{'form.otherserver'}) { $env{'form.otherserver'}=&Apache::lonnet::spareserver(30000,undef,1); - $switch_to=$Apache::lonnet::hostname{$env{'form.otherserver'}}; + $switch_to=&Apache::lonnet::hostname($env{'form.otherserver'}); } if (!defined($switch_to)) { return FORBIDDEN; }