Index: openacs-4/packages/contacts/tcl/attribute-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/tcl/attribute-procs.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/contacts/tcl/attribute-procs.tcl	29 Aug 2005 22:49:50 -0000	1.5
+++ openacs-4/packages/contacts/tcl/attribute-procs.tcl	30 Aug 2005 21:31:23 -0000	1.6
@@ -62,7 +62,9 @@
 	Returns a list of only the attributes that have
 	multiple choices of the format {pretty_name attribute_id}
     } {
-	return [db_list_of_lists get_option_attributes { }]
+	set options [db_list_of_lists get_option_attributes { }]
+	lappend options [list "[_ contacts.Country]" "-1"]
+	return $options
     }
 
 }