Index: openacs-4/packages/contacts/tcl/contacts-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/tcl/contacts-procs.tcl,v
diff -u -N -r1.118 -r1.119
--- openacs-4/packages/contacts/tcl/contacts-procs.tcl	30 Jun 2007 10:41:13 -0000	1.118
+++ openacs-4/packages/contacts/tcl/contacts-procs.tcl	11 Aug 2007 20:12:20 -0000	1.119
@@ -1255,7 +1255,8 @@
     contact::group::add_member \
 	-group_id $default_group_id \
 	-user_id $person_id \
-	-rel_type "membership_rel"
+	-rel_type "membership_rel" \
+        -no_perm_check
 
     # Store the AMS attribute
     set object_id [contact::revision::new -party_id $person_id]