Index: openacs-4/packages/xotcl-core/tcl/30-widget-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/30-widget-procs.tcl,v
diff -u -r1.59 -r1.60
--- openacs-4/packages/xotcl-core/tcl/30-widget-procs.tcl	21 Oct 2017 13:07:27 -0000	1.59
+++ openacs-4/packages/xotcl-core/tcl/30-widget-procs.tcl	22 Dec 2017 13:51:55 -0000	1.60
@@ -45,7 +45,7 @@
   ::xo::tdom::Class instproc incr_level {{amount 1}} {
     #
     # Keep the nesting level of TdomClass instances during creation.
-    # Use a global variable to assure cleanup in case of execptions.
+    # Use a global variable to assure cleanup in case of exceptions.
     #
     set var __tdom_level
     global $var