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 -r1.6 -r1.7
--- openacs-4/packages/contacts/www/admin/index.tcl	12 Jun 2005 21:23:16 -0000	1.6
+++ openacs-4/packages/contacts/www/admin/index.tcl	28 Jun 2005 19:23:41 -0000	1.7
@@ -116,6 +116,20 @@
 }
 
 
+    set ams_person_url [ams::list::url \
+                          -package_key "contacts" \
+                          -object_type "person" \
+                          -list_name "${package_id}__-2" \
+                          -pretty_name "${package_id}__-2" \
+                          -return_url $return_url \
+                          -return_url_label "[_ contacts.Return_to_title]"]
+    set ams_org_url [ams::list::url \
+                          -package_key "contacts" \
+                          -object_type "organization" \
+                          -list_name "${package_id}__-2" \
+                          -pretty_name "${package_id}__-2" \
+                          -return_url $return_url \
+                          -return_url_label "[_ contacts.Return_to_title]"]