Index: openacs-4/packages/acs-developer-support/tcl/acs-developer-support-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-developer-support/tcl/acs-developer-support-procs.tcl,v diff -u -r1.65 -r1.66 --- openacs-4/packages/acs-developer-support/tcl/acs-developer-support-procs.tcl 3 Sep 2024 15:37:33 -0000 1.65 +++ openacs-4/packages/acs-developer-support/tcl/acs-developer-support-procs.tcl 28 Oct 2024 16:04:31 -0000 1.66 @@ -402,7 +402,7 @@ } if { ![info exists ::ad_conn(request)] } { - set ::ad_conn(request) [nsv_incr rp_properties request_count] + set ::ad_conn(request) [ns_conn id] } nsv_lappend ds_request $::ad_conn(request).$name {*}$args } @@ -450,7 +450,7 @@ ns_log "Debug" "Swept developer support information for [array size kill_requests] requests ($kill_count nsv elements)" } -ad_proc -private ds_trace_filter { conn args why } { +ad_proc -private ds_trace_filter { why args } { Adds developer-support information about the end of sessions. } { if { [ds_enabled_p] && [ds_collection_enabled_p] } {