--- loncom/auth/lonlogin.pm 2009/10/06 23:43:21 1.127 +++ loncom/auth/lonlogin.pm 2009/10/21 12:29:40 1.128 @@ -1,7 +1,7 @@ # The LearningOnline Network # Login Screen # -# $Id: lonlogin.pm,v 1.127 2009/10/06 23:43:21 raeburn Exp $ +# $Id: lonlogin.pm,v 1.128 2009/10/21 12:29:40 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -117,8 +117,7 @@ sub handler { if ($lonhost ne '') { my $loginvia = $domconfhash{$domain.'.login.loginvia_'.$lonhost}; if (($loginvia ne '') && ($loginvia ne $lonhost)) { - my %servers = &Apache::lonnet::get_servers($domain); - if ($servers{$loginvia} ne '') { + if (&Apache::lonnet::hostname($loginvia) ne '') { $r->print(&redirect_page($loginvia)); return OK; }