Index: openacs-4/packages/xotcl-request-monitor/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-request-monitor/www/index.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/xotcl-request-monitor/www/index.tcl	19 Oct 2006 10:47:07 -0000	1.4
+++ openacs-4/packages/xotcl-request-monitor/www/index.tcl	24 Oct 2006 15:14:49 -0000	1.5
@@ -237,9 +237,12 @@
 
 set current_response [join [currentResponseTime] " "]
 set current_load [currentSystemLoad]
-set running [throttle nr_running]
+set running_requests [throttle running]
+set background_requests [bgdelivery running]
+set background  [expr {[llength $background_requests]/2}]
+set running [expr {[llength $running_requests]/2}]
 if {![catch {ns_conn contentsentlength}]} {
-  append running /[bgdelivery nr_running]
+  append running /$background
 }
 
 if {[info command ::tlf::system_activity] ne ""} {