Index: openacs-4/packages/acs-service-contract/tcl/acs-service-contract-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-service-contract/tcl/acs-service-contract-procs.tcl,v diff -u -r1.33.2.6 -r1.33.2.7 --- openacs-4/packages/acs-service-contract/tcl/acs-service-contract-procs.tcl 22 Aug 2022 14:44:18 -0000 1.33.2.6 +++ openacs-4/packages/acs-service-contract/tcl/acs-service-contract-procs.tcl 4 Jan 2023 16:33:03 -0000 1.33.2.7 @@ -58,7 +58,8 @@ set proc_name [acs_sc_generate_name $contract $impl $operation] if { [namespace which $proc_name] ne "" } { - #ns_log notice "CALL FORMER ad_apply [list $proc_name {*}$call_args]" + # ns_log warning "CALL FORMER ad_apply [list $proc_name {*}$call_args]" + # ns_log warning "$proc_name {*}$call_args" return [$proc_name {*}$call_args] }