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 -r1.67 -r1.68
--- openacs-4/packages/xotcl-core/tcl/01-debug-procs.tcl	21 Dec 2012 20:54:59 -0000	1.67
+++ openacs-4/packages/xotcl-core/tcl/01-debug-procs.tcl	21 Dec 2012 22:56:33 -0000	1.68
@@ -492,6 +492,7 @@
     ns_log notice "ON DELETE $args"
     ::xo::broadcast clear
     set t0 [clock clicks -milliseconds]
+    ::xo::system_stats recordtimes
     #
     # Check, if we have a new XOTcl implementation with ::xotcl::finalize
     # 
@@ -513,7 +514,6 @@
       }
     }
     set t1 [clock clicks -milliseconds]
-    ::xo::system_stats recordtimes
     ns_log notice "ON DELETE done ([expr {$t1-$t0}]ms)"
   }