Index: openacs-4/packages/xotcl-core/tcl/test/xotcl-test-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/test/Attic/xotcl-test-procs.tcl,v
diff -u -N -r1.1.2.25 -r1.1.2.26
--- openacs-4/packages/xotcl-core/tcl/test/xotcl-test-procs.tcl	16 Jan 2023 10:51:24 -0000	1.1.2.25
+++ openacs-4/packages/xotcl-core/tcl/test/xotcl-test-procs.tcl	16 Jan 2023 17:27:03 -0000	1.1.2.26
@@ -541,17 +541,17 @@
     # Create a multirow with 0 entries and append a row "manually"
     # For details, see # https://openacs.org/bugtracker/openacs/bug?bug_number=3441
     #
-    ::xo::dc multirow person_mr1 noxql {
+    ::xo::dc multirow __xotcl_person_mr1 noxql {
         SELECT person_id, first_names, last_name
         FROM persons WHERE false
     }
 
-    aa_equals "have empty multirow" [template::multirow size person_mr1] 0
-    template::multirow append person_mr1 1234 “Ed” “Grooberman”
-    aa_equals "have one tuple in multirow" [template::multirow size person_mr1] 1
+    aa_equals "have empty multirow" [template::multirow size __xotcl_person_mr1] 0
+    template::multirow append __xotcl_person_mr1 1234 “Ed” “Grooberman”
+    aa_equals "have one tuple in multirow" [template::multirow size __xotcl_person_mr1] 1
 
     aa_equals "columns empty" \
-        [template::multirow columns person_mr1] \
+        [template::multirow columns __xotcl_person_mr1] \
         "person_id first_names last_name"
 
     set user_id [ad_conn user_id]