Index: openacs-4/packages/acs-subsite/www/admin/users/new.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/users/new.tcl,v
diff -u -N -r1.7 -r1.8
--- openacs-4/packages/acs-subsite/www/admin/users/new.tcl	18 Dec 2003 10:08:08 -0000	1.7
+++ openacs-4/packages/acs-subsite/www/admin/users/new.tcl	29 Jun 2004 10:17:43 -0000	1.8
@@ -190,7 +190,7 @@
 
             if { $add_to_group_id != [acs_lookup_magic_object "registered_users"] ||
                  ![string equal $add_with_rel_type "membership_rel"] } {
-	        relation_add -form_id add_user -variable_prefix rel -member_state $rel_member_state $add_with_rel_type $add_to_group_id $user_id
+	        relation_add -member_state $rel_member_state $add_with_rel_type $add_to_group_id $user_id
             }
 
 	} on_error {