Index: openacs-4/packages/contacts/tcl/contacts-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/tcl/contacts-procs.tcl,v
diff -u -r1.29 -r1.30
--- openacs-4/packages/contacts/tcl/contacts-procs.tcl	16 Sep 2005 15:43:05 -0000	1.29
+++ openacs-4/packages/contacts/tcl/contacts-procs.tcl	17 Sep 2005 10:59:48 -0000	1.30
@@ -558,8 +558,10 @@
     set revision_id [contact::live_revision -party_id $party_id]
     set values [ams::values -package_key "contacts" -object_type $object_type -list_name $list_name -object_id $revision_id]
     array set return_array [list]
+
+    # Never forget to localize the values retrieved from ams.
     foreach {section attribute pretty_name value} $values {
-	set return_array($attribute) $value 
+	set return_array($attribute) [lang::util::localize $value]
     }
     if {![empty_string_p $attribute_name]} {
 	return $return_array($attribute_name)