From: Sam H. v. a. <we...@ma...> - 2005-10-26 16:32:41
|
Log Message: ----------- more debugging Modified Files: -------------- webwork2/lib/WeBWorK/ContentGenerator: Login.pm Revision Data ------------- Index: Login.pm =================================================================== RCS file: /webwork/cvs/system/webwork2/lib/WeBWorK/ContentGenerator/Login.pm,v retrieving revision 1.33 retrieving revision 1.34 diff -Llib/WeBWorK/ContentGenerator/Login.pm -Llib/WeBWorK/ContentGenerator/Login.pm -u -r1.33 -r1.34 --- lib/WeBWorK/ContentGenerator/Login.pm +++ lib/WeBWorK/ContentGenerator/Login.pm @@ -177,6 +177,7 @@ my @GuestUsers = $db->getUsers(@guestUserIDs); my @allowedGuestUsers; foreach my $GuestUser (@GuestUsers) { + warn "GuestUser=".$GuestUser->toString."\n"; next unless defined $GuestUser->status; next unless $GuestUser->status ne ""; push @allowedGuestUsers, $GuestUser |