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.56 -r1.57
--- openacs-4/packages/xotcl-core/tcl/cr-procs.tcl	9 Oct 2017 13:06:53 -0000	1.56
+++ openacs-4/packages/xotcl-core/tcl/cr-procs.tcl	21 Oct 2017 13:07:27 -0000	1.57
@@ -243,7 +243,7 @@
 
   CrClass instproc edit_atts {} {
     # TODO remove, when name and text are slots (only for generic)
-    :array names db_slot
+    array names :db_slot
   }
 
   CrClass ad_instproc folder_type_unregister_all {