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 -r1.9 -r1.9.2.1
--- openacs-4/packages/acs-tcl/tcl/test/community-core-test-procs.tcl	3 Nov 2018 11:15:16 -0000	1.9
+++ openacs-4/packages/acs-tcl/tcl/test/community-core-test-procs.tcl	28 Oct 2019 17:38:39 -0000	1.9.2.1
@@ -43,7 +43,6 @@
         person::new
         person::person_p
         person::update
-        person::update_bio
     } \
     person_procs_test \
     {
@@ -96,7 +95,7 @@
                 aa_true "name changed" [string match [person::name -person_id $prs_id] "hh$first_names hh$last_name"]
 
                 set bio "bio :: [ad_generate_random_string] :: bio"
-                person::update_bio -person_id $prs_id -bio $bio
+                person::update -person_id $prs_id -bio $bio
 
                 aa_true "bio(graphy) ok" [string match $bio [person::get_bio -person_id $prs_id -exists_var bio_p]]