Index: openacs-4/packages/general-comments/www/comment-add-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/www/comment-add-2.tcl,v
diff -u -r1.6 -r1.6.20.1
--- openacs-4/packages/general-comments/www/comment-add-2.tcl	7 Nov 2002 08:32:49 -0000	1.6
+++ openacs-4/packages/general-comments/www/comment-add-2.tcl	6 Sep 2013 16:01:49 -0000	1.6.20.1
@@ -30,7 +30,7 @@
 }
 
 # check to see if the user can create comments on this object
-ad_require_permission $object_id general_comments_create
+permission::require_permission -object_id $object_id -privilege general_comments_create
 
 # ad_page_contract does not set object_name to
 # [acs_object_name $object_id] if object_name is passed