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 -r1.137 -r1.138
--- openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl	11 Jul 2018 21:57:26 -0000	1.137
+++ openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl	24 Jul 2018 18:46:12 -0000	1.138
@@ -273,7 +273,7 @@
   ::xo::db::Driver abstract instproc list_of_lists  {{-dbn ""} {-bind ""} -prepare qn sql}
   ::xo::db::Driver abstract instproc list           {{-dbn ""} {-bind ""} -prepare qn sql}
   ::xo::db::Driver abstract instproc dml            {{-dbn ""} {-bind ""} -prepare qn sql}
-  ::xo::db::Driver abstract instproc foreach        {{-dbn ""} {-bind ""} -prepare qn sql script}
+  ::xo::db::Driver abstract instproc foreach        {{-dbn ""} {-bind ""} -prepare qn sql {script}}
   ::xo::db::Driver abstract instproc transaction    {{-dbn ""} script args}
   ::xo::db::Driver abstract instproc ds {onOff}
   ::xo::db::Driver abstract instproc prepare        {-handle {-argtypes ""} sql}
@@ -763,7 +763,7 @@
 
   ##########################################################################
   #
-  # Deprecated functions, obsolted by xo::dc
+  # Deprecated functions, obsoleted by xo::dc
   #
   ad_proc -deprecated has_ltree {} {
     Check, whether ltree is available (postgres only)
Index: openacs-4/packages/xotcl-core/tcl/cr-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/cr-procs.tcl,v
diff -u -r1.72 -r1.73
--- openacs-4/packages/xotcl-core/tcl/cr-procs.tcl	29 Jun 2018 16:06:30 -0000	1.72
+++ openacs-4/packages/xotcl-core/tcl/cr-procs.tcl	24 Jul 2018 18:46:12 -0000	1.73
@@ -1576,7 +1576,7 @@
 
   ::xo::db::CrFolder instproc delete {} {
     if {[:is_package_root_folder]} {
-      ad_return_error "Removal denied" "Dont delete the package root folder, delete the package"
+      ad_return_error "Removal denied" "Don't delete the package root folder, delete the package"
       return
     }
     ::xo::db::sql::content_folder del -folder_id ${:folder_id} -cascade_p t
Index: openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl,v
diff -u -r1.360 -r1.361
--- openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl	11 Jun 2018 18:47:26 -0000	1.360
+++ openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl	24 Jul 2018 18:46:12 -0000	1.361
@@ -2012,7 +2012,7 @@
       # between different kinds of inputs.
       #
       set type [expr {[$field hasAttribute type] ? [$field getAttribute type] : "text"}]
-      # the switch should be really different objects ad classes...., but thats HTML, anyhow.
+      # the switch should be really different objects ad classes...., but that's HTML, anyhow.
       switch -- $type {
         checkbox {
           #:msg "$att: CHECKBOX value='$value', [$field hasAttribute checked], [$field hasAttribute value]"