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 {