[WWcvs] webwork2: HEAD backport: make sure that $r->param("users") is only used

[Sam H. v. a. <act...@de...>]

Log Message:
-----------
HEAD backport: make sure that $r->param("users") is only used in a
scalar context. (gage)

Tags:
----
rel-2-1-patches

Modified Files:
--------------
    webwork2/lib/WeBWorK/ContentGenerator/Instructor:
        AddUsers.pm

Revision Data
-------------
Index: AddUsers.pm
===================================================================
RCS file: /webwork/cvs/system/webwork2/lib/WeBWorK/ContentGenerator/Instructor/AddUsers.pm,v
retrieving revision 1.15
retrieving revision 1.15.4.1
diff -Llib/WeBWorK/ContentGenerator/Instructor/AddUsers.pm -Llib/WeBWorK/ContentGenerator/Instructor/AddUsers.pm -u -r1.15 -r1.15.4.1
--- lib/WeBWorK/ContentGenerator/Instructor/AddUsers.pm
+++ lib/WeBWorK/ContentGenerator/Instructor/AddUsers.pm
@@ -114,10 +114,10 @@
 	
 	# Check permissions
 	return CGI::div({class=>"ResultsWithError"}, "You are not authorized to access the Instructor tools.")
-		unless $authz->hasPermissions($r->param("user"), "access_instructor_tools");
+		unless $authz->hasPermissions($user, "access_instructor_tools");
 	
 	return CGI::div({class=>"ResultsWithError"}, "You are not authorized to modify student data.")
-		unless $authz->hasPermissions($r->param("user"), "modify_student_data");
+		unless $authz->hasPermissions($user, "modify_student_data");
 
 	
 	return join("",