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 -N -r1.148.2.83 -r1.148.2.84
--- openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl	19 Apr 2023 17:19:23 -0000	1.148.2.83
+++ openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl	24 Oct 2023 16:12:35 -0000	1.148.2.84
@@ -2631,7 +2631,8 @@
         continue
       }
       $o mset [ns_set array $selection]
-
+      ns_set free $selection
+      
       if {[$o exists object_type]} {
         #
         # Set the object type if it looks like managed from XOTcl.