Index: openacs-4/packages/acs-developer-support/www/request-info.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-developer-support/www/request-info.tcl,v diff -u -r1.21 -r1.22 --- openacs-4/packages/acs-developer-support/www/request-info.tcl 18 Jun 2015 19:03:33 -0000 1.21 +++ openacs-4/packages/acs-developer-support/www/request-info.tcl 7 Aug 2017 23:47:56 -0000 1.22 @@ -114,10 +114,10 @@ continue } - set duration [format "%.1f ms" [expr { $endclicks - $startclicks }]] + set duration [format "%.1f ms" [expr { ($endclicks - $startclicks)/1000.0 }]] if { [info exists conn(startclicks)] } { - append body "
  • [format "%+06.1f" [expr { ($startclicks - $conn(startclicks)) }]] ms: " + append body "
  • [format "%+06.1f" [expr { ($startclicks - $conn(startclicks))/1000.0 }]] ms: " } else { append body "
  • " } @@ -358,3 +358,9 @@ multirow append profiling $tag $total_ms $file_links $size } } + +# Local variables: +# mode: tcl +# tcl-indent-level: 4 +# indent-tabs-mode: nil +# End: