Index: openacs-4/packages/xotcl-request-monitor/www/long-calls.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-request-monitor/www/long-calls.tcl,v diff -u -r1.2.2.6 -r1.2.2.7 --- openacs-4/packages/xotcl-request-monitor/www/long-calls.tcl 30 Jan 2017 11:29:51 -0000 1.2.2.6 +++ openacs-4/packages/xotcl-request-monitor/www/long-calls.tcl 31 Jan 2017 10:24:44 -0000 1.2.2.7 @@ -61,7 +61,7 @@ set queuetime [dict get $time queuetime] set filtertime [dict get $time filtertime] set runtime [dict get $time runtime] - set totaltime [expr {$queuetime + $filtertime + $runtime}] + set totaltime [format %8.6f [expr {$queuetime + $filtertime + $runtime}]] set color(queuetime) [::xo::colorize_slow_calls -warning 1.000 -danger 5.000 $queuetime] set color(filtertime) [::xo::colorize_slow_calls -warning 0.500 -danger 1.000 $filtertime] set color(runtime) [::xo::colorize_slow_calls -warning 3.000 -danger 5.000 $runtime]