--- loncom/auth/migrateuser.pm 2005/10/25 19:14:32 1.2 +++ loncom/auth/migrateuser.pm 2005/10/28 21:51:43 1.3 @@ -1,7 +1,7 @@ # The LearningOnline Network # Starts a user off based of an existing token. # -# $Id: migrateuser.pm,v 1.2 2005/10/25 19:14:32 albertel Exp $ +# $Id: migrateuser.pm,v 1.3 2005/10/28 21:51:43 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -71,12 +71,12 @@ sub handler { my $home=&Apache::lonnet::homeserver($data{'username'},$data{'domain'}); if ($home =~ /(con_lost|no_such_host)/) { return &goto_login($r); } - if (!defined($data{'role'})) { + if (!$data{'role'}) { &Apache::lonauth::success($r,$data{'username'},$data{'domain'}, $home,'/adm/roles'); return OK; } - + my $cookie=&Apache::lonauth::success($r,$data{'username'},$data{'domain'}, $home,'noredirect'); $r->header_out('Set-cookie',"lonID=$cookie; path=/");