Index: openacs-4/packages/xotcl-request-monitor/www/index.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-request-monitor/www/index.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/xotcl-request-monitor/www/index.adp	14 Dec 2005 16:09:02 -0000	1.1
+++ openacs-4/packages/xotcl-request-monitor/www/index.adp	1 Dec 2006 09:33:22 -0000	1.2
@@ -8,7 +8,10 @@
 
 
 <table style="border: 0px solid blue; padding: 10px;">
-  <tr><td><b>Active Users:</b></td><td>@active_user_string;noquote@</td></tr>
+  <tr><td><b>Active Users:</b></td><td>@active_user_string;noquote@</td><if @param_url@ ne "">
+<td align="right"><a class="button" href="@param_url@">#acs-subsite.parameters#</a></td>
+</if>
+</tr>
   <tr><td><b>Current System Activity:</b></td><td>@current_system_activity@</td></tr>
   <tr><td><b>Current System Load:</b></td><td>@current_load@</td></tr>
   <tr><td><b>Current Avg Response Time/sec:</b></td><td>@current_response@</td></tr>
Index: openacs-4/packages/xotcl-request-monitor/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-request-monitor/www/index.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/xotcl-request-monitor/www/index.tcl	24 Oct 2006 15:14:49 -0000	1.5
+++ openacs-4/packages/xotcl-request-monitor/www/index.tcl	1 Dec 2006 09:33:22 -0000	1.6
@@ -272,3 +272,12 @@
 set jsGraph [expr {!$jsGraph}]
 set toggle_graphics_url [export_vars -base [ad_conn url] {jsGraph}]
 set jsGraph [expr {!$jsGraph}]
+
+# Parameters URL
+if {[acs_user::site_wide_admin_p]} {
+    set return_url [ad_return_url]
+    set package_id [ad_conn package_id]
+    set param_url [export_vars -base "/shared/parameters" -url {package_id return_url}]
+} else {
+    set param_url ""
+}