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 -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 {} {