Index: openacs-4/tcl/zz-postload.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/tcl/zz-postload.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/tcl/zz-postload.tcl	7 Aug 2017 23:48:31 -0000	1.7
+++ openacs-4/tcl/zz-postload.tcl	15 Oct 2018 16:52:00 -0000	1.8
@@ -12,7 +12,7 @@
 ns_log "Notice" "Done."
 
 # This should probably be moved to the end of bootstrap.tcl once all files are
-# weeded out of the tcl directory.
+# weeded out of the Tcl directory.
 ns_log "Notice" "Executing initialization code blocks..."
 foreach init_item [nsv_get ad_after_server_initialization .] {
     array set init $init_item
@@ -36,7 +36,7 @@
 proc __is_xql {arg} { 
     return [expr {[file isdirectory $arg] || [file extension $arg] eq ".xql"}]}
 
-# We need to load query files for the top-level stuff in www and tcl
+# We need to load query files for the top-level stuff in www and Tcl
 # dirs is the list of directories to walk for xql files.  Packages .xql
 # files are parsed elsewhere in the bootstrap process.