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.26 -r1.71.2.27
--- openacs-4/packages/acs-tcl/tcl/test/acs-tcl-test-procs.tcl	3 Jun 2020 18:41:03 -0000	1.71.2.26
+++ openacs-4/packages/acs-tcl/tcl/test/acs-tcl-test-procs.tcl	3 Jul 2020 07:27:29 -0000	1.71.2.27
@@ -851,15 +851,15 @@
 } {
     aa_equals "Empty value" [util::trim_leading_zeros {}] {}
     aa_equals "Real value (0.31)" [util::trim_leading_zeros 0.31] {.31}
-    aa_equals "Real value with multiple leading zeroes (000.31)" [util::trim_leading_zeros 0000.31] {.31}
+    aa_equals "Real value with multiple leading zeros (000.31)" [util::trim_leading_zeros 0000.31] {.31}
     aa_equals "Real value already trimmed (.31)" [util::trim_leading_zeros .31] {.31}
     aa_equals "Natural value (031)" [util::trim_leading_zeros 031] {31}
-    aa_equals "Natural value with multiple leading zeroes (000031)" [util::trim_leading_zeros 000031] {31}
+    aa_equals "Natural value with multiple leading zeros (000031)" [util::trim_leading_zeros 000031] {31}
     aa_equals "Natural value already trimmed (31)" [util::trim_leading_zeros 31] {31}
     aa_equals "String (0asfda)" [util::trim_leading_zeros 0asfda] {asfda}
-    aa_equals "String with multiple leading zeroes (000asfda)" [util::trim_leading_zeros 000asfda] {asfda}
+    aa_equals "String with multiple leading zeros (000asfda)" [util::trim_leading_zeros 000asfda] {asfda}
     aa_equals "String already trimmed (asfda)" [util::trim_leading_zeros asfda] {asfda}
-    aa_equals "Only zeroes (000)" [util::trim_leading_zeros 000] {0}
+    aa_equals "Only zeros (000)" [util::trim_leading_zeros 000] {0}
     aa_equals "Only one zero (0)" [util::trim_leading_zeros 0] {0}
 }