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 -N -r1.58 -r1.59
--- openacs-4/packages/acs-templating/tcl/date-procs.tcl	29 Jun 2018 17:27:18 -0000	1.58
+++ openacs-4/packages/acs-templating/tcl/date-procs.tcl	29 Jun 2018 18:57:51 -0000	1.59
@@ -793,10 +793,14 @@
 
 
 
-ad_proc -public template::util::leadingPad { string size } {
+ad_proc -public -deprecated template::util::leadingPad { string size } {
     Pad a string with leading zeroes
+
+    Deprecated: please use the new and more general 'ad_pad'.
+
+    @see ad_pad
 } {
-  
+
   if {$string eq ""} {
     return ""
   }
@@ -805,7 +809,7 @@
   append ret $string
   return $ret
 
-}  
+}
 
 ad_proc -public -deprecated template::util::leadingTrim { value } {
     Trim the leading zeroes from the value, but preserve the value