From: Mike G. v. a. <we...@ma...> - 2010-05-25 22:28:10
|
Log Message: ----------- Remove unneeded warning. Modified Files: -------------- webwork2/lib/WeBWorK/ContentGenerator: Problem.pm Revision Data ------------- Index: Problem.pm =================================================================== RCS file: /webwork/cvs/system/webwork2/lib/WeBWorK/ContentGenerator/Problem.pm,v retrieving revision 1.223 retrieving revision 1.224 diff -Llib/WeBWorK/ContentGenerator/Problem.pm -Llib/WeBWorK/ContentGenerator/Problem.pm -u -r1.223 -r1.224 --- lib/WeBWorK/ContentGenerator/Problem.pm +++ lib/WeBWorK/ContentGenerator/Problem.pm @@ -1131,9 +1131,9 @@ ) if defined($self->{editMode}) and $self->{editMode} eq 'temporaryFile'; # this is a security risk -- students can use this to find the source code for the problem + my $permissionLevel = $db->getPermissionLevel($user)->permission; my $professorPermissionLevel = $ce->{userRoles}->{professor}; - warn "checking permssionlevel", $permissionLevel>= $professorPermissionLevel; print( CGI::hidden( -name => 'sourceFilePath', -value => $self->{problem}->{source_file} @@ -1143,6 +1143,7 @@ -name => 'problemSeed', -value => $r->param("problemSeed") )) if defined($r->param("problemSeed")) and $permissionLevel>= $professorPermissionLevel; # only allow this for professors + # end of main form print CGI::endform(); |