Index: openacs-4/packages/contacts/www/admin/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/www/admin/index.tcl,v
diff -u -N -r1.13 -r1.14
--- openacs-4/packages/contacts/www/admin/index.tcl	13 Dec 2006 13:03:53 -0000	1.13
+++ openacs-4/packages/contacts/www/admin/index.tcl	14 Jan 2007 11:35:24 -0000	1.14
@@ -14,6 +14,7 @@
 set context {}
 set package_id [ad_conn package_id]
 set parameter_url [export_vars -base "/shared/parameters" {package_id {return_url "[ad_conn url]"}}]
+set ams_parameter_url [export_vars -base "/shared/parameters" {{package_id "[apm_package_id_from_key ams]"} {return_url "[ad_conn url]"}}]
 template::list::create \
     -name "groups" \
     -multirow "groups" \