Index: openacs-4/packages/acs-tcl/tcl/test/defs-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/test/Attic/defs-procs.tcl,v
diff -u -N -r1.1.2.2 -r1.1.2.3
--- openacs-4/packages/acs-tcl/tcl/test/defs-procs.tcl	8 Sep 2022 08:13:34 -0000	1.1.2.2
+++ openacs-4/packages/acs-tcl/tcl/test/defs-procs.tcl	18 Oct 2022 06:57:15 -0000	1.1.2.3
@@ -38,11 +38,11 @@
         aa_true "Link '$link' contains 'One label'" \
             {[string first "One label" $link] >= 0}
 
-        aa_section "Admin link with default label (user name)"
+        aa_section "Admin link with default label (username)"
         set link [acs_community_member_admin_link -user_id $user_id]
         aa_true "Link '$link' contains '$url'" \
             {[string first [ns_quotehtml $url] $link] >= 0}
-        aa_true "Link '$link' contains the user name" \
+        aa_true "Link '$link' contains the username" \
             {[string first [person::name -person_id $user_id] $link] >= 0}
 
         set member_url [parameter::get -package_id $::acs::kernel_id -parameter CommunityMemberURL]
@@ -64,11 +64,11 @@
         aa_true "Link '$link' contains 'One label'" \
             {[string first "One label" $link] >= 0}
 
-        aa_section "Member link with default label (user name)"
+        aa_section "Member link with default label (username)"
         set link [acs_community_member_link -user_id $user_id]
         aa_true "Link '$link' contains '$url'" \
             {[string first [ns_quotehtml $url] $link] >= 0}
-        aa_true "Link '$link' contains the user name" \
+        aa_true "Link '$link' contains the username" \
             {[string first [person::name -person_id $user_id] $link] >= 0}
 
         aa_section "Admin home URL"