Index: openacs-4/packages/news/www/item-create-3.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/item-create-3.tcl,v
diff -u -r1.14 -r1.15
--- openacs-4/packages/news/www/item-create-3.tcl	30 Dec 2009 23:13:36 -0000	1.14
+++ openacs-4/packages/news/www/item-create-3.tcl	6 Sep 2013 16:46:28 -0000	1.15
@@ -26,10 +26,10 @@
 
 #  news_create permissions
 set package_id [ad_conn package_id]
-ad_require_permission $package_id news_create
+permission::require_permission -object_id $package_id -privilege news_create
 
 
-set news_admin_p [ad_permission_p $package_id news_admin]
+set news_admin_p [permission::permission_p -object_id $package_id -privilege news_admin]
 # get instance-wide approval policy : [closed|wait|open]
 set approval_policy [ad_parameter ApprovalPolicy "news" "wait"]