Index: openacs-4/packages/contacts/www/person-groups-ae.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/www/person-groups-ae.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/contacts/www/person-groups-ae.tcl	4 Jun 2005 12:36:45 -0000	1.2
+++ openacs-4/packages/contacts/www/person-groups-ae.tcl	7 Jun 2005 07:45:40 -0000	1.3
@@ -23,7 +23,7 @@
 set package_key "contacts"
 
 if { [ad_form_new_p -key person_id] } {
-    set title "Add a Person"
+    set title "[_ contacts.Add_a_Person]"
     set mode "edit"
 } else {
     set title [person::name -person_id $person_id]
@@ -43,7 +43,7 @@
     -mode "display" \
     -has_edit "t" \
     -actions {
-        {"Add to Group" "formbutton:edit"}
+        {"[_ contacts.Add_to_Group]" "formbutton:edit"}
     } -form {
         {person_id:key}
     }
@@ -69,13 +69,13 @@
      where groups.group_id != '-1'
 }]
 ad_form -extend -name groups_ae -form {
-	{group_id:integer(checkbox),multiple {label "Groups"} {options $group_options}}
+	{group_id:integer(checkbox),multiple {label "[_ contacts.Groups]"} {options $group_options}}
     } -edit_request {
 	set group_id [db_list get_them { select distinct group_id from group_member_map where member_id = :person_id }]
         #ad_return_error $group_id $group_id
     } -on_submit {
     } -after_submit {
-        ad_returnredirect -message "Group Information Saved." [export_vars -base "person-ae" -url {person_id}]
+        ad_returnredirect -message "[_ contacts.lt_Group_Information_Sav]" [export_vars -base "person-ae" -url {person_id}]
     }