Index: openacs-4/packages/xotcl-request-monitor/tcl/throttle_mod-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-request-monitor/tcl/throttle_mod-procs.tcl,v
diff -u -N -r1.67.2.3 -r1.67.2.4
--- openacs-4/packages/xotcl-request-monitor/tcl/throttle_mod-procs.tcl	14 Jun 2019 10:46:21 -0000	1.67.2.3
+++ openacs-4/packages/xotcl-request-monitor/tcl/throttle_mod-procs.tcl	14 Jun 2019 10:50:36 -0000	1.67.2.4
@@ -66,8 +66,7 @@
   if {![file isdirectory $logdir]} {file mkdir $logdir}
 
   #
-  # Create AsyncLogFile class, which is one client of the
-  # AsyncDiskWriter from bgdelivery
+  # Create AsyncLogFile class
   #
   Class create AsyncLogFile -parameter {filename {mode a}}
 
@@ -79,7 +78,9 @@
   }
 
   if {[acs::icanuse ns_asynclogfile]} {
-
+    #
+    # Use NaviServer builtin async disk writer.
+    #
     ns_log notice "... AsyncLogFile uses NaviServer ns_asynclogfile"
 
     AsyncLogFile instproc open {} {
@@ -100,6 +101,10 @@
     }
 
   } else {
+    #
+    # Make AsyncLogFile a client of the
+    # AsyncDiskWriter in bgdelivery.
+    #
     ns_log notice "... AsyncLogFile uses bgdelivery"
 
     AsyncLogFile instproc open {} {