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 -r1.76.2.59 -r1.76.2.60
--- openacs-4/packages/xotcl-core/tcl/cr-procs.tcl	15 Apr 2022 17:28:07 -0000	1.76.2.59
+++ openacs-4/packages/xotcl-core/tcl/cr-procs.tcl	26 Jun 2022 19:32:08 -0000	1.76.2.60
@@ -1768,8 +1768,7 @@
           -content_types [[self class] set allowed_content_types]
     }
     ::xo::xotcl_object_cache flush ${:parent_id}
-    # who is setting sub_folder_list?
-    #db_flush_cache -cache_key_pattern sub_folder_list_*
+
     return ${:folder_id}
   }