Index: openacs-4/packages/wp-slim/www/delete-presentation.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/wp-slim/www/delete-presentation.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/wp-slim/www/delete-presentation.tcl	21 Dec 2004 22:06:47 -0000	1.4
+++ openacs-4/packages/wp-slim/www/delete-presentation.tcl	12 Sep 2013 20:47:19 -0000	1.5
@@ -15,8 +15,8 @@
     pres_item_id
 }
 
-ad_require_permission $pres_item_id wp_delete_presentation
+permission::require_permission -object_id $pres_item_id -privilege wp_delete_presentation
 
-set context [list [list "presentation-top?[export_url_vars pres_item_id]" "$title"] "[_ wp-slim.Delete_Presentation]"]
+set context [list [list "presentation-top?[export_vars -url {pres_item_id}]" "$title"] "[_ wp-slim.Delete_Presentation]"]
 
 ad_return_template