Index: openacs-4/packages/general-comments/www/file-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/www/file-edit.tcl,v
diff -u -r1.4 -r1.4.20.1
--- openacs-4/packages/general-comments/www/file-edit.tcl	7 Nov 2002 08:32:49 -0000	1.4
+++ openacs-4/packages/general-comments/www/file-edit.tcl	6 Sep 2013 16:01:50 -0000	1.4.20.1
@@ -24,7 +24,7 @@
 }
 
 # check to see if the user can edit this comment
-ad_require_permission $attach_id write
+permission::require_permission -object_id $attach_id -privilege write
 
 # get the values from the database
 db_1row get_comment {