Index: openacs-4/packages/acs-tcl/tcl/test/community-core-test-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/test/community-core-test-procs.tcl,v
diff -u -N -r1.9.2.1 -r1.9.2.2
--- openacs-4/packages/acs-tcl/tcl/test/community-core-test-procs.tcl	28 Oct 2019 17:38:39 -0000	1.9.2.1
+++ openacs-4/packages/acs-tcl/tcl/test/community-core-test-procs.tcl	27 Feb 2020 14:21:18 -0000	1.9.2.2
@@ -59,6 +59,7 @@
         array set user_info [auth::create_user  -user_id $user_id  -username $username \
                                  -email $email  -first_names $first_names  -last_name $last_name \
                                  -password $password  -secret_question [ad_generate_random_string] \
+                                 -authority_id [auth::authority::get_id -short_name "acs_testing"] \
                                  -secret_answer [ad_generate_random_string]]
 
         if { $user_info(creation_status) ne "ok" } {