Index: openacs-4/contrib/packages/simulation/test/simulation-test-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/test/Attic/simulation-test-procs.tcl,v
diff -u -r1.15 -r1.16
--- openacs-4/contrib/packages/simulation/test/simulation-test-procs.tcl	10 Mar 2004 15:22:35 -0000	1.15
+++ openacs-4/contrib/packages/simulation/test/simulation-test-procs.tcl	11 Mar 2004 09:16:45 -0000	1.16
@@ -29,6 +29,7 @@
         do_request "/admin/group-types/one?group_type=group"
         link follow ~u "parties/new"
 
+        form find ~n add_group
         field find ~n group.group_name
         field fill "Demo group $i"
         form submit
@@ -596,6 +597,7 @@
     }
 
     do_request $add_user_url
+    form find ~n add_relation
     field find ~n party_id
     field select $user_name
     form submit    
Index: openacs-4/packages/simulation/test/simulation-test-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/test/simulation-test-procs.tcl,v
diff -u -r1.15 -r1.16
--- openacs-4/packages/simulation/test/simulation-test-procs.tcl	10 Mar 2004 15:22:35 -0000	1.15
+++ openacs-4/packages/simulation/test/simulation-test-procs.tcl	11 Mar 2004 09:16:45 -0000	1.16
@@ -29,6 +29,7 @@
         do_request "/admin/group-types/one?group_type=group"
         link follow ~u "parties/new"
 
+        form find ~n add_group
         field find ~n group.group_name
         field fill "Demo group $i"
         form submit
@@ -596,6 +597,7 @@
     }
 
     do_request $add_user_url
+    form find ~n add_relation
     field find ~n party_id
     field select $user_name
     form submit