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 -N -r1.93.2.35 -r1.93.2.36
--- openacs-4/packages/xotcl-core/tcl/01-debug-procs.tcl	14 Feb 2021 21:13:25 -0000	1.93.2.35
+++ openacs-4/packages/xotcl-core/tcl/01-debug-procs.tcl	19 Feb 2021 10:11:54 -0000	1.93.2.36
@@ -510,10 +510,13 @@
     unset ::xo::cleanup_always($key)
   }
 
-  #
-  # Per-request cleanup handler.
-  #
-  ad_proc -private at_cleanup {args} {
+  ad_proc at_cleanup {args} {
+    #
+    # Per-request cleanup handler. The handler is as well called by
+    # the xowiki-datasource and must be therefore public.
+    #
+
+  } {
     ::xo::dc profile off
     ::xo::broadcast receive