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.148.2.56 -r1.148.2.57
--- openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl	22 Aug 2022 17:06:40 -0000	1.148.2.56
+++ openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl	12 Sep 2022 13:09:16 -0000	1.148.2.57
@@ -2709,6 +2709,10 @@
         {not_null}
         {unique}
         {index}
+      } {
+        #
+        # ORM class representing an acs_attribute from and acs_object.
+        #
       }
 
   if {[::acs::icanuse "nsv_dict"]} {
@@ -2829,7 +2833,12 @@
 
   ##############
   ::xotcl::MetaSlot create ::xo::db::CrAttribute \
-      -superclass {::xo::db::Attribute}
+      -superclass {::xo::db::Attribute} {
+        #
+        # ORM class representing an acs_attribute for a content_type
+        # in the Content Repository.
+        #
+      }
 
   ::xo::db::CrAttribute instproc create_attribute {} {
     # do nothing, if create_acs_attribute is set to false