Index: openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl,v diff -u -r1.189.2.76 -r1.189.2.77 --- openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl 1 Feb 2021 10:51:09 -0000 1.189.2.76 +++ openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl 8 Feb 2021 11:47:11 -0000 1.189.2.77 @@ -3798,21 +3798,21 @@ ad_proc -public ad_log { level - message + args } { Output ns_log message with detailed context. This function is intended to be used typically with "error" to ease debugging. @param level Severity level such as "error" or "warning". - @param message Log message + @param args Log message @author Gustaf Neumann } { set with_headers [expr {$level in {error Error}}] append request " " \ [util::request_info -with_headers=$with_headers] - ns_log $level "${message}\n[uplevel ad_get_tcl_call_stack]${request}\n" + ns_log $level {*}$args "\n[uplevel ad_get_tcl_call_stack]${request}\n" } ad_proc -public util::var_subst_quotehtml {