Index: openacs-4/packages/contacts/www/search.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/www/search.tcl,v
diff -u -r1.29 -r1.30
--- openacs-4/packages/contacts/www/search.tcl	17 Apr 2006 06:15:01 -0000	1.29
+++ openacs-4/packages/contacts/www/search.tcl	18 Apr 2006 07:14:37 -0000	1.30
@@ -240,6 +240,13 @@
     if { [exists_and_not_null condition_name] && [string equal $condition_name [_ contacts.Employees]] } {
 	set employee_p 1
     }
+
+    if { $search_exists_p } {
+	# the search already exists so we put the option of not selecting
+        # a new condition type, otherwise all form manipulations make
+        # the assumption that a new type was selected
+	set type_options [concat [list [list "- - - -" ""]] $type_options]
+    }
     if { !$employee_p } {
 	# Show the attribute options of the search
 	append form_elements {
@@ -248,7 +255,6 @@
     }
 }
 
-
 #get condition types widgets
 set form_elements [concat \
 		       $form_elements \