--- loncom/auth/lonlogin.pm	2009/10/06 21:58:30	1.126
+++ loncom/auth/lonlogin.pm	2009/10/06 23:43:21	1.127
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Login Screen
 #
-# $Id: lonlogin.pm,v 1.126 2009/10/06 21:58:30 raeburn Exp $
+# $Id: lonlogin.pm,v 1.127 2009/10/06 23:43:21 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -113,18 +113,14 @@ sub handler {
 
     my $lonhost = $r->dir_config('lonHostID');
     my $domain = &Apache::lonnet::default_login_domain();
-    my %domconfig = &Apache::loncommon::get_domainconf($domain);
+    my %domconfhash = &Apache::loncommon::get_domainconf($domain);
     if ($lonhost ne '') {
-        if (ref($domconfig{login}) eq 'HASH') {
-            if (ref($domconfig{login}{loginvia}) eq 'HASH') {
-                if ($domconfig{login}{loginvia}{$lonhost}) {
-                    my $loginvia = $domconfig{login}{loginvia}{$lonhost};
-                    my %servers = &Apache::lonnet::get_servers($domain);
-                    if (($servers{$loginvia} ne '') && ($loginvia ne $lonhost)) {
-                        $r->print(&redirect_page($loginvia));
-                        return OK;
-                    }
-                }
+        my $loginvia = $domconfhash{$domain.'.login.loginvia_'.$lonhost};
+        if (($loginvia ne '') && ($loginvia ne $lonhost)) {
+            my %servers = &Apache::lonnet::get_servers($domain);
+            if ($servers{$loginvia} ne '') {
+                $r->print(&redirect_page($loginvia));
+                return OK;
             }
         }
     }