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