Index: openacs-4/packages/contacts/www/admin/attribute-list.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/www/admin/attribute-list.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/contacts/www/admin/attribute-list.tcl	18 Nov 2005 17:48:27 -0000	1.2
+++ openacs-4/packages/contacts/www/admin/attribute-list.tcl	3 Feb 2006 16:53:41 -0000	1.3
@@ -81,7 +81,7 @@
     # in the list, otherwise we could have duplicated.
     if { ![empty_string_p $attr_id] } {
 	lappend attribute_values $attr_id
-	lappend default_names "[_ acs-translations.ams_attribute_${attr_id}_pretty_name]"
+	lappend default_names [attribute::pretty_name -attribute_id $attribute]
     }
 }