Index: openacs-4/packages/contacts/www/contact-rels.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/www/contact-rels.tcl,v diff -u -r1.7 -r1.8 --- openacs-4/packages/contacts/www/contact-rels.tcl 5 Jun 2005 19:44:54 -0000 1.7 +++ openacs-4/packages/contacts/www/contact-rels.tcl 7 Jun 2005 07:45:40 -0000 1.8 @@ -15,12 +15,12 @@ } -validate { contact_one_exists -requires {party_id} { if { ![contact::exists_p -party_id $party_id] } { - ad_complain "The first contact specified does not exist" + ad_complain "[_ contacts.lt_The_first_contact_spe]" } } contact_two_exists -requires {party_two} { if { ![contact::exists_p -party_id $party_two] } { - ad_complain "The second contact specified does not exist" + ad_complain "[_ contacts.lt_The_second_contact_sp]" } } @@ -59,12 +59,12 @@ } else { if { $org_valid_p } { set rel_type "organization_rel" - set pretty_plural_list_name "organizations" + set pretty_plural_list_name "[_ contacts.organizations]" } elseif { $person_valid_p } { set rel_type "membership_rel" - set pretty_plural_list_name "people" + set pretty_plural_list_name "[_ contacts.people]" } else { - error "neither person nor org type is valid, what happened admin?" + error "[_ contacts.lt_neither_person_nor_or]" } } } @@ -129,7 +129,7 @@ -html {width 100%} \ -name "contacts" \ -multirow "contacts" \ - -row_pretty_plural "$pretty_plural_list_name found in search, please try again or add a new contact" \ + -row_pretty_plural "[_ contacts.lt_pretty_plural_list_na]" \ -checkbox_name checkbox \ -selected_format ${format} \ -orderby_name "order_search" \ @@ -144,7 +144,7 @@ contact { label {} display_template { - @contacts.party_id@">@contacts.name@ \[Select\] + @contacts.party_id@">@contacts.name@ \[[_ contacts.Select]\] @contacts.email@ } } @@ -166,19 +166,19 @@ } -filters { } -orderby { first_names { - label "First Name" + label "[_ contacts.First_Name]" orderby_asc "lower(contact__name(party_id,'f')) asc" orderby_desc "lower(contact__name(party_id,'f')) asc" } last_name { - label "Last Name" + label "[_ contacts.Last_Name]" orderby_asc "lower(contact__name(party_id,'t')) asc" orderby_desc "lower(contact__name(party_id,'t')) asc" } default_value first_names,asc } -formats { normal { - label "Table" + label "[_ contacts.Table]" layout table row { contact {} @@ -201,9 +201,9 @@ ad_form -name "search" -method "GET" -export {party_id} -form { - {role_two:text(select) {label "Add: "} {options $rel_options}} + {role_two:text(select) {label "[_ contacts.Add]"} {options $rel_options}} {query:text(text) {label ""} {html {size 24}}} - {search:text(submit) {label "Search"}} + {search:text(submit) {label "[_ contacts.Search]"}} } -on_request { } -edit_request { } -on_refresh { @@ -215,46 +215,46 @@ -html {width 100%} \ -name "relationships" \ -multirow "relationships" \ - -row_pretty_plural "relationships" \ + -row_pretty_plural "[_ contacts.relationships]" \ -selected_format "normal" \ -elements { role { - label "Role" + label "[_ contacts.Role]" display_col role_singular } other_name { - label "Contact" + label "[_ contacts.Contact]" display_col other_name link_url_eval $contact_url } details { - label "Details" + label "[_ contacts.Details]" display_col details;noquote } actions { - label "Actions" + label "[_ contacts.Actions]" display_template { - Delete - Edit Details + [_ contacts.Delete] + [_ contacts.Edit_Details] } } } -filters { party_id {} } -orderby { other_name { - label "Contact" + label "[_ contacts.Contact]" orderby_asc "CASE WHEN object_id_one = :party_id THEN upper(contact__name(object_id_two)) ELSE upper(contact__name(object_id_one)) END asc, upper(role_singular) asc" orderby_desc "CASE WHEN object_id_one = :party_id THEN upper(contact__name(object_id_two)) ELSE upper(contact__name(object_id_one)) END desc, upper(role_singular) asc" } role { - label "Role" + label "[_ contacts.Role]" orderby_asc "upper(role_singular) asc, CASE WHEN object_id_one = :party_id THEN upper(contact__name(object_id_two)) ELSE upper(contact__name(object_id_one)) END asc" orderby_desc "upper(role_singular) desc, CASE WHEN object_id_one = :party_id THEN upper(contact__name(object_id_two)) ELSE upper(contact__name(object_id_one)) END asc" } default_value role,asc } -formats { normal { - label "Table" + label "[_ contacts.Table]" layout table row { role {}