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 -N -r1.76.2.21 -r1.76.2.22
--- openacs-4/packages/xotcl-core/tcl/cr-procs.tcl	23 Jul 2019 16:56:01 -0000	1.76.2.21
+++ openacs-4/packages/xotcl-core/tcl/cr-procs.tcl	9 Aug 2019 19:45:14 -0000	1.76.2.22
@@ -1759,7 +1759,7 @@
       #
       # We do not want to cache per object mixins for the
       # time being (some classes might be volatile). So save
-      # mixin-list, cache and resore them later for the current
+      # mixin-list, cache and restore them later for the current
       # session.
       set mixins [$obj info mixin]
       $obj mixin [list]
@@ -1773,7 +1773,7 @@
       #
       ::xo::xotcl_object_cache flush [string trimleft $canonical_name :]
     }
-    # To be on he safe side, delete the revison as well from the
+    # To be on he safe side, delete the revision as well from the
     # cache, if possible.
     if {[$obj exists revision_id]} {
       set revision_id [$obj revision_id]