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.3 -r1.4
--- openacs-4/packages/contacts/www/admin/index.tcl 18 May 2005 16:45:50 -0000 1.3
+++ openacs-4/packages/contacts/www/admin/index.tcl 7 Jun 2005 07:45:40 -0000 1.4
@@ -10,50 +10,50 @@
set orderby "name"
-set title "Contact Administration"
+set title "[_ contacts.lt_Contact_Administratio]"
set context {}
set package_id [ad_conn package_id]
template::list::create \
-name "groups" \
-multirow "groups" \
- -row_pretty_plural "groups" \
+ -row_pretty_plural "[_ contacts.groups]" \
-elements {
edit {
label {}
display_template {
-
+
}
}
group_name {
label {Group}
display_col group_name
}
member_count {
- label {\# Contacts}
+ label {[_ contacts.Contacts]}
display_col member_count
link_url_eval $group_url
}
mapped {
label {Mapped}
display_template {
-
+
-
+
}
}
default {
label {Default}
display_template {
-
+
-
+
@@ -62,17 +62,17 @@
}
person_form {
display_template {
- Person Form
+ [_ contacts.Person_Form]
}
}
org_form {
display_template {
- Organization Form
+ [_ contacts.Organization_Form]
}
}
actions {
display_template {
- Permissions
+ [_ contacts.Permissions]
}
}
} -filters {
@@ -96,14 +96,14 @@
-list_name "${package_id}__${group_id}" \
-pretty_name "${package_id}__${group_id}" \
-return_url [ad_conn url] \
- -return_url_label "Return to \"$title\""]
+ -return_url_label "[_ contacts.Return_to_title]"]
set ams_org_url [ams::list::url \
-package_key "contacts" \
-object_type "organization" \
-list_name "${package_id}__${group_id}" \
-pretty_name "${package_id}__${group_id}" \
-return_url [ad_conn url] \
- -return_url_label "Return to \"$title\""]
+ -return_url_label "[_ contacts.Return_to_title]"]
multirow append groups [lindex $group 1] [lindex $group 0] "../?group_id=${group_id}" $ams_person_url $ams_org_url $member_count $level $mapped_p $default_p