Index: openacs-4/packages/acs-tcl/tcl/test/acs-tcl-test-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/test/acs-tcl-test-procs.tcl,v
diff -u -r1.71.2.19 -r1.71.2.20
--- openacs-4/packages/acs-tcl/tcl/test/acs-tcl-test-procs.tcl	29 Nov 2019 11:12:34 -0000	1.71.2.19
+++ openacs-4/packages/acs-tcl/tcl/test/acs-tcl-test-procs.tcl	29 Nov 2019 13:50:46 -0000	1.71.2.20
@@ -913,26 +913,28 @@
 aa_register_case \
     -cats {api smoke production_safe} \
     -procs {
-        min
-        max
+        util::min
+        util::max
     } \
     min_max {
 
-        Test min and max procs
+        Test util::min and util::max procs
 
         @creation-date 2018-09-18
         @author Héctor Romojaro <hector.romojaro@gmail.com>
 } {
-    aa_equals "Empty value" [min {}] {}
-    aa_equals "Empty value" [max {}] {}
-    aa_equals "1" [min 1] {1}
-    aa_equals "1" [max 1] {1}
-    aa_equals "1 0 -1" [min 1 0 -2] {-2}
-    aa_equals "1 0 -1" [max 1 0 -2] {1}
-    aa_equals "0 0.89 -0.89 -1" [min 0 0.89 -0.89 -1] {-1}
-    aa_equals "0 0.89 -0.89 -1" [max 0 0.89 -0.89 -1] {0.89}
-    aa_equals "3 1000 0 -3 -2000" [min 3 1000 0 -3 -2000] {-2000}
-    aa_equals "3 1000 0 -3 -2000" [max 3 1000 0 -3 -2000] {1000}
+    aa_equals "Empty value" [util::min {}] {}
+    aa_equals "Empty value" [util::max {}] {}
+    aa_equals "1" [util::min 1] {1}
+    aa_equals "1" [util::max 1] {1}
+    aa_equals "1 0 -1" [util::min 1 0 -2] {-2}
+    aa_equals "1 0 -1" [util::max 1 0 -2] {1}
+    aa_equals "0 0.89 -0.89 -1" [util::min 0 0.89 -0.89 -1] {-1}
+    aa_equals "0 0.89 -0.89 -1" [util::max 0 0.89 -0.89 -1] {0.89}
+    aa_equals "3 1000 0 -3 -2000" [util::min 3 1000 0 -3 -2000] {-2000}
+    aa_equals "3 1000 0 -3 -2000" [util::max 3 1000 0 -3 -2000] {1000}
+    aa_equals "1 2 z a b 6" [util::max 1 2 z a b 6] z
+    aa_equals "1 2 z a b 6" [util::min 1 2 z a b 6] 1
 }
 
 aa_register_case \