Index: openacs-4/packages/acs-tcl/tcl/00-database-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/00-database-procs.tcl,v diff -u -N -r1.90 -r1.91 --- openacs-4/packages/acs-tcl/tcl/00-database-procs.tcl 1 Oct 2017 12:16:05 -0000 1.90 +++ openacs-4/packages/acs-tcl/tcl/00-database-procs.tcl 21 Oct 2017 10:59:35 -0000 1.91 @@ -1114,7 +1114,7 @@ # If we took more than 3 seconds yack about it. if { [clock clicks -milliseconds] - $start_time > 3000 } { set duration [format %.2f [expr {[clock clicks -milliseconds] - $start_time}]] - ns_log Warning "db_exec: longdb $duration seconds $db $type $statement_name" + ns_log Warning "db_exec: longdb $duration ms $db $type $statement_name" } else { #set duration [format %.2f [expr {[clock clicks -milliseconds] - $start_time}]] #ns_log Debug "db_exec: timing $duration seconds $db $type $statement_name"