Index: openacs-4/packages/acs-admin/www/apm/version-files.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/version-files.tcl,v
diff -u -r1.15 -r1.16
--- openacs-4/packages/acs-admin/www/apm/version-files.tcl	10 Jan 2007 21:21:59 -0000	1.15
+++ openacs-4/packages/acs-admin/www/apm/version-files.tcl	29 Sep 2008 08:40:33 -0000	1.16
@@ -81,8 +81,8 @@
 			    # This procs file is already being watched.
 			    append body "<td>&nbsp;being watched&nbsp;</td>"
 			} else {
-			    if {![ad_parameter -package_id [ad_acs_kernel_id] \
-				    PerformanceModeP request-processor 1]} {
+			    if {![parameter::get -package_id [ad_acs_kernel_id] \
+                                      -parameter PerformanceModeP -default 1]} {
 				# Provide a link to watch the procs file.
 				append body "<td>&nbsp;<a href=\"file-watch?[export_vars -url {version_id {paths $path} return_url}]\">watch</a>&nbsp;</td>"
 			    } else {