--- loncom/auth/lonlogin.pm 2005/06/14 20:10:50 1.55.2.3 +++ loncom/auth/lonlogin.pm 2004/03/16 20:42:50 1.56 @@ -1,7 +1,7 @@ # The LearningOnline Network # Login Screen # -# $Id: lonlogin.pm,v 1.55.2.3 2005/06/14 20:10:50 albertel Exp $ +# $Id: lonlogin.pm,v 1.56 2004/03/16 20:42:50 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -68,7 +68,6 @@ sub handler { Already logged in - $bodytag

You are already logged in

Please either continue the current session or @@ -109,10 +108,6 @@ ENDFAILED my $iconpath= 'http://'.$ENV{'HTTP_HOST'}.':'.$port_to_use. $r->dir_config('lonIconsURL'); my $domain = $r->dir_config('lonDefDomain'); - my $testdomain=(split(/\./,$ENV{'HTTP_HOST'}))[0]; - foreach my $posdom (values(%Apache::lonnet::hostdom)) { - if (lc($posdom) eq lc($testdomain)) { $domain=$posdom; } - } if (($ENV{'form.domain'}) && ($Apache::lonnet::domaindescription{$ENV{'form.domain'}})) { $domain=$ENV{'form.domain'};