Index: openacs-4/packages/faq/www/admin/swap.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/faq/www/admin/swap.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/faq/www/admin/swap.tcl	20 Apr 2001 20:51:10 -0000	1.1
+++ openacs-4/packages/faq/www/admin/swap.tcl	28 Nov 2003 16:55:15 -0000	1.2
@@ -16,10 +16,9 @@
 
 set package_id [ad_conn package_id]
 
-ad_require_permission $package_id faq_modify_faq
+permission::require_permission -object_id $package_id -privilege faq_modify_faq
 
 
-
 # get the sort_key for this entry_id, faq_id 
 db_1row faq_sortkey_get "
 select sort_key as current_sort_key