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.14 -r1.15
--- openacs-4/contrib/packages/simulation/test/simulation-test-procs.tcl	28 Jan 2004 15:15:31 -0000	1.14
+++ openacs-4/contrib/packages/simulation/test/simulation-test-procs.tcl	10 Mar 2004 15:22:35 -0000	1.15
@@ -528,6 +528,7 @@
     {-last_name:required}
 } {
     do_request /acs-admin/users/user-add
+    form find ~n register
     field find ~n email
     set email [email_from_user_name "$first_names $last_name"]
     field fill $email
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.14 -r1.15
--- openacs-4/packages/simulation/test/simulation-test-procs.tcl	28 Jan 2004 15:15:31 -0000	1.14
+++ openacs-4/packages/simulation/test/simulation-test-procs.tcl	10 Mar 2004 15:22:35 -0000	1.15
@@ -528,6 +528,7 @@
     {-last_name:required}
 } {
     do_request /acs-admin/users/user-add
+    form find ~n register
     field find ~n email
     set email [email_from_user_name "$first_names $last_name"]
     field fill $email