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 -N -r1.3 -r1.4 --- openacs-4/packages/acs-developer-support/tcl/acs-developer-support-procs.tcl 13 Mar 2002 22:50:53 -0000 1.3 +++ openacs-4/packages/acs-developer-support/tcl/acs-developer-support-procs.tcl 3 Jul 2002 16:15:31 -0000 1.4 @@ -144,7 +144,7 @@ } } - if { [ad_parameter ShowCommentsInlineP "developer-support" 0] } { + if { [ad_parameter -package_id [ds_instance_id] ShowCommentsInlineP "developer-support" 0] } { if { [nsv_exists ds_request "$ad_conn(request).comment"] } { append out "
" foreach comment [nsv_get ds_request "$ad_conn(request).comment"] { @@ -205,7 +205,7 @@ proc ds_sweep_data {} { set now [ns_time] - set lifetime [ad_parameter DataLifetime "developer-support" 900] + set lifetime [ad_parameter -package_id [ds_instance_id] DataLifetime "developer-support" 900] # kill_requests is an array of request numbers to kill array set kill_requests [list]