Index: openacs-4/packages/general-comments/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/www/index.tcl,v
diff -u -r1.7 -r1.7.14.1
--- openacs-4/packages/general-comments/www/index.tcl	1 Mar 2005 00:01:37 -0000	1.7
+++ openacs-4/packages/general-comments/www/index.tcl	6 Sep 2013 12:06:51 -0000	1.7.14.1
@@ -21,7 +21,7 @@
 
 # check for admin privileges
 set package_id [ad_conn package_id]
-set admin_p [ad_permission_p $package_id admin]
+set admin_p [permission::permission_p -object_id $package_id -privilege admin]
 
 # return_url to be passed to various helper pages so that we return to
 # this page with the proper parameters