Index: openacs-4/packages/acs-tcl/tcl/request-processor-init.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/request-processor-init.tcl,v
diff -u -r1.12 -r1.13
--- openacs-4/packages/acs-tcl/tcl/request-processor-init.tcl	10 Jan 2007 21:22:12 -0000	1.12
+++ openacs-4/packages/acs-tcl/tcl/request-processor-init.tcl	23 Dec 2008 12:23:00 -0000	1.13
@@ -10,7 +10,7 @@
 # These procedures are dynamically defined at startup to alleviate
 # lock contention. Thanks to davis@xarg.net.
 
-if { [ad_parameter -package_id [ad_acs_kernel_id] PerformanceModeP request-processor 0] } {
+if { [parameter::get -package_id [ad_acs_kernel_id] -parameter PerformanceModeP -default 0] } {
   ad_proc -private rp_performance_mode {} {
     Returns 1 if the request processor is in performance mode, 0 otherwise.
   } {