Index: openacs-4/packages/acs-templating/tcl/date-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/date-procs.tcl,v
diff -u -r1.63.2.5 -r1.63.2.6
--- openacs-4/packages/acs-templating/tcl/date-procs.tcl	14 Jul 2019 22:59:26 -0000	1.63.2.5
+++ openacs-4/packages/acs-templating/tcl/date-procs.tcl	3 Jul 2020 07:27:29 -0000	1.63.2.6
@@ -443,7 +443,7 @@
         return $date
     }
 
-  # Erase leading zeroes from the value, but make sure that 00
+  # Erase leading zeros from the value, but make sure that 00
   # is not completely erased - but only for single-element properties
 
   switch -- $value {
@@ -512,7 +512,7 @@
     }
     ansi {
         # Some initialization...
-        # Rip $date into $ansi_* as numbers, no leading zeroes
+        # Rip $date into $ansi_* as numbers, no leading zeros
         set matchdate {([0-9]{4})\-0?(1?[0-9])\-0?([1-3]?[0-9])}
         set matchtime {0?([1-2]?[0-9]):0?([1-5]?[0-9]):0?([1-6]?[0-9])}
         set matchfull "$matchdate $matchtime"
@@ -687,7 +687,7 @@
     foreach field [array names time_in] {
         # skip format
         if {$field ne "format" } {
-            # Coerce values to non-negative integers
+            # Coerce values to nonnegative integers
             if { $field ne "ampm" } {
                 if { ![regexp {[0-9]+} $time_in($field) value] } {
                     set value {}
@@ -707,7 +707,7 @@
     foreach field [array names date_in] {
         # skip format
         if {$field ne "format" } {
-            # Coerce values to non-negative integers
+            # Coerce values to nonnegative integers
             if { ![regexp {[0-9]+} $date_in($field) value] } {
                 set value {}
             }
@@ -820,7 +820,7 @@
 
 
 ad_proc -public -deprecated template::util::leadingPad { string size } {
-    Pad a string with leading zeroes
+    Pad a string with leading zeros
 
     Deprecated: please use the new and more general 'ad_pad'.
 
@@ -838,7 +838,7 @@
 }
 
 ad_proc -public -deprecated template::util::leadingTrim { value } {
-    Trim the leading zeroes from the value, but preserve the value
+    Trim the leading zeros from the value, but preserve the value
     as "0" if it is "00"
 
     @see util::trim_leading_zeros
@@ -1136,7 +1136,7 @@
      set key "$element_id.$field"
      if { [ns_queryexists $key] } {
        set value [ns_queryget $key]
-       # Coerce values to non-negative integers
+       # Coerce values to nonnegative integers
        if { $field ne "ampm" } {
          if { ![regexp {[0-9]+} $value value] } {
            set value {}