--- loncom/auth/lonlogin.pm 2005/08/30 21:14:20 1.68 +++ loncom/auth/lonlogin.pm 2005/11/23 20:46:04 1.69 @@ -1,7 +1,7 @@ # The LearningOnline Network # Login Screen # -# $Id: lonlogin.pm,v 1.68 2005/08/30 21:14:20 albertel Exp $ +# $Id: lonlogin.pm,v 1.69 2005/11/23 20:46:04 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -60,7 +60,7 @@ sub handler { my $handle=$lonid->value; $handle=~s/\W//g; my $lonidsdir=$r->dir_config('lonIDsDir'); - if ((-e "$lonidsdir/$handle.id") && ($handle ne '')) { + if ((-e "$lonidsdir/$handle.id") && ($handle ne '') && ($handle!~/^publicuser\_/)) { # Indeed, a valid token is found my $bodytag=&Apache::loncommon::bodytag('Already logged in'); $r->print(<