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.25.2.3 -r1.25.2.4 --- openacs-4/packages/acs-developer-support/www/request-info.tcl 3 Mar 2020 14:53:25 -0000 1.25.2.3 +++ openacs-4/packages/acs-developer-support/www/request-info.tcl 29 Aug 2022 14:17:23 -0000 1.25.2.4 @@ -265,7 +265,7 @@ append value "$command $statement_pool $handle
[ns_quotehtml $sql]
" } - if { $command ne "getrow" || [template::util::is_true $getrow_p] } { + if { $command ne "getrow" || [string is true -strict $getrow_p] } { multirow append dbreqs $handle [lindex $command 0] $sql [format %.2f [expr { $end - $start }]] $value }