Index: openacs-4/packages/contacts/www/search.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/www/search.tcl,v
diff -u -r1.12 -r1.13
--- openacs-4/packages/contacts/www/search.tcl	19 Jun 2005 07:00:28 -0000	1.12
+++ openacs-4/packages/contacts/www/search.tcl	19 Jun 2005 09:33:51 -0000	1.13
@@ -122,11 +122,7 @@
 if { [exists_and_not_null object_type] } {
 
     # QUERY TYPE
-    set type_options [list \
-                          [list "[_ contacts.Attribute_-]" "attribute"] \
-                          [list "[_ contacts.Contact_-]" "contact"] \
-                          [list "[_ contacts.Group_-]" "group"] \
-                         ]
+    set type_options [contacts::search::condition_types]
 
     append form_elements {
         {type:text(select),optional {label {}} {options $type_options} {html {onChange "javascript:acs_FormRefresh('advanced_search')"}}}