Index: openacs-4/packages/xotcl-core/tcl/01-debug-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/01-debug-procs.tcl,v
diff -u -r1.95 -r1.96
--- openacs-4/packages/xotcl-core/tcl/01-debug-procs.tcl	8 Oct 2024 15:09:25 -0000	1.95
+++ openacs-4/packages/xotcl-core/tcl/01-debug-procs.tcl	22 Oct 2024 16:28:15 -0000	1.96
@@ -43,6 +43,12 @@
         constraint_values
         help_text
         validator
+      } {
+        #
+        # OpenACS specific attribute slot class, which can be further
+        # refined.  Contains meta data based on the OpenACS meta-data
+        # conventions.
+        #
       }
 }
 
@@ -234,6 +240,9 @@
 
 namespace eval ::xo {
   ::xo::Attribute instproc init {} {
+    #
+    # Constructor of the OpenACS specific attribute slot class
+    #
     next
     # provide a default pretty name for the attribute based on message keys
     if {![info exists :pretty_name]} {