Index: openacs-4/packages/dotlrn-fs/tcl/test/dotlrn-fs-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-fs/tcl/test/dotlrn-fs-procs.tcl,v
diff -u -r1.4.2.1 -r1.4.2.2
--- openacs-4/packages/dotlrn-fs/tcl/test/dotlrn-fs-procs.tcl	3 Apr 2019 07:46:14 -0000	1.4.2.1
+++ openacs-4/packages/dotlrn-fs/tcl/test/dotlrn-fs-procs.tcl	3 Apr 2019 07:53:09 -0000	1.4.2.2
@@ -16,7 +16,7 @@
         -rollback \
         -test_code {
             # create a new dotlrn user
-            array set creation_info [auth::create_user -email "an.email.unlikely.to.exist@i.hope.it.does.not" -first_names "test" -last_name "user"]
+            array set creation_info [acs::test::user::create]
             aa_log "create user result is: $creation_info(creation_status)"
             aa_equals creation_ok $creation_info(creation_status) ok