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.48.4.6 -r1.48.4.7
--- openacs-4/packages/acs-templating/tcl/date-procs.tcl	26 Oct 2013 09:16:22 -0000	1.48.4.6
+++ openacs-4/packages/acs-templating/tcl/date-procs.tcl	9 Sep 2014 08:32:01 -0000	1.48.4.7
@@ -119,7 +119,7 @@
 } {
     Create a new Date object
     I chose to implement the date objects as lists instead of 
-    arrays, because arrays are not first-class in TCL
+    arrays, because arrays are not first-class in Tcl
 } {
   return [list $year $month $day $hours $minutes $seconds $format]
 }
@@ -1179,7 +1179,7 @@
     Collect a textdate from the form, it automatically
     reformats it from the users locale to the iso standard
     YYYY-MM-DD this is useful because it doesn't need
-    reformatting in tcl code
+    reformatting in Tcl code
 } {
 
     upvar $element_ref element