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.29 -r1.30 --- openacs-4/packages/xotcl-request-monitor/www/index.tcl 3 Nov 2018 10:40:10 -0000 1.29 +++ openacs-4/packages/xotcl-request-monitor/www/index.tcl 4 Nov 2018 17:37:17 -0000 1.30 @@ -389,16 +389,8 @@ } array set thread_avgs [throttle thread_avgs] +set current_system_activity [currentViews] -if {[info commands ::tlf::system_activity] ne ""} { - array set server_stats [::tlf::system_activity] - set current_exercise_activity $server_stats(activity) - set current_system_activity "$server_stats(activity) exercises last 15 mins, " -} else { - set current_system_activity "" -} -append current_system_activity \n[currentViews] - set throttle_stats [throttle statistics] set active10 [throttle users nr_users_time_window] set authUsers10 [lindex $active10 1]