Index: openacs-4/packages/acs-subsite/www/members/member-invite.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/members/member-invite.tcl,v
diff -u -r1.13 -r1.14
--- openacs-4/packages/acs-subsite/www/members/member-invite.tcl	17 Dec 2017 18:36:06 -0000	1.13
+++ openacs-4/packages/acs-subsite/www/members/member-invite.tcl	6 Jun 2018 22:58:09 -0000	1.14
@@ -42,7 +42,7 @@
 }
 
 ad_form -extend -name user_search -on_submit {
-    set create_p [group::permission_p -privilege create $group_id]
+    set create_p [party::permission_p -privilege create $group_id]
 
     if { $group_info(join_policy) eq "closed" && !$create_p} {
         ad_return_forbidden "Cannot invite members" "I'm sorry, but you're not allowed to invite members to this group"