Index: openacs-4/packages/dotlrn-homework/www/folder-create.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/folder-create.tcl,v
diff -u -r1.3.12.1 -r1.3.12.2
--- openacs-4/packages/dotlrn-homework/www/folder-create.tcl	18 Aug 2014 21:53:43 -0000	1.3.12.1
+++ openacs-4/packages/dotlrn-homework/www/folder-create.tcl	18 Aug 2014 21:56:34 -0000	1.3.12.2
@@ -33,7 +33,7 @@
 # to upload homework files but only class admins can create new homework
 # subfolders.
 
-ad_require_permission $parent_id admin
+permission::require_permission -object_id $parent_id -privilege admin
 
 ad_form -name homework_form -form {
     {return_url:text(hidden)         {value $return_url}}