Index: openacs-4/packages/contacts/www/group-party.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/www/group-party.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/contacts/www/group-party.tcl	18 May 2005 16:45:50 -0000	1.1
+++ openacs-4/packages/contacts/www/group-party.tcl	6 Jul 2005 23:40:25 -0000	1.2
@@ -61,7 +61,7 @@
                 foreach party_id $party_ids {
                     # relation_add verifies that they aren't already in the group
                     switch [contact::type -party_id $party_id] {
-                        person {
+                        person - user {
                             set rel_type "membership_rel"
                         }
                         organization {