Index: openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl,v
diff -u -N -r1.103.2.34 -r1.103.2.35
--- openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl	21 Apr 2017 14:00:24 -0000	1.103.2.34
+++ openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl	22 Apr 2017 16:59:39 -0000	1.103.2.35
@@ -633,7 +633,7 @@
     } else {
       #
       # Compute a PREPARE statement and an EXECUTE statement on the
-      # fly. Notice, that the incoming SQL statement must not have tcl
+      # fly. Notice, that the incoming SQL statement must not have Tcl
       # vars, but has to use bind vars.
       #
       set c 0; set l ""; set last 0;
@@ -1221,7 +1221,7 @@
 
   ::xo::db::postgresql instproc get_all_package_functions {} {
     #
-    # Load defintions in one step from function args; only for
+    # Load definitions in one step from function args; only for
     # those definitions where we do not have function args, we parse
     # the function arg aliases.
     #