Index: openacs-4/packages/assessment/www/admin/item-swap.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/admin/Attic/item-swap.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/assessment/www/admin/item-swap.tcl	29 Dec 2004 09:07:39 -0000	1.2
+++ openacs-4/packages/assessment/www/admin/item-swap.tcl	24 Jan 2005 14:54:31 -0000	1.3
@@ -16,7 +16,7 @@
     direction:notnull
 }
 
-permission::permission_p -object_id $assessment_id -privilege admin
+permission::require_permission -object_id $assessment_id -privilege admin
 
 if { $direction=="up" } {
      set next_sort_order [expr { $sort_order - 1 }]