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 -N -r1.65 -r1.66
--- openacs-4/packages/acs-tcl/tcl/test/acs-tcl-test-procs.tcl	18 Sep 2018 14:27:19 -0000	1.65
+++ openacs-4/packages/acs-tcl/tcl/test/acs-tcl-test-procs.tcl	18 Sep 2018 15:01:30 -0000	1.66
@@ -891,6 +891,31 @@
 }
 
 aa_register_case \
+    -cats {api smoke production_safe} \
+    -procs {
+        min
+        max
+    } \
+    min_max {
+
+        Test min and 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_register_case \
     -cats {api} \
     -procs util_url_valid_p \
     acs_tcl__util_url_valid_p {