Index: openacs-4/packages/acs-tcl/tcl/tcltrace-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/tcltrace-procs.tcl,v
diff -u -r1.4.2.2 -r1.4.2.3
--- openacs-4/packages/acs-tcl/tcl/tcltrace-procs.tcl	10 Aug 2019 14:33:26 -0000	1.4.2.2
+++ openacs-4/packages/acs-tcl/tcl/tcltrace-procs.tcl	27 Mar 2020 09:01:00 -0000	1.4.2.3
@@ -87,8 +87,8 @@
 	@param op the trace operation 
 
     } {
-        set cmd [expr {$details_p ? "ad_log" : "ns_log"}]
-        $cmd notice "trace: $cmd"
+        set log_cmd [expr {$details_p ? "ad_log" : "ns_log"}]
+        $log_cmd notice "trace: $cmd"
     }
    
 }