Index: openacs-4/packages/contacts/www/admin/ext-search-options.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/www/admin/ext-search-options.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/contacts/www/admin/ext-search-options.tcl 9 Sep 2005 22:18:03 -0000 1.2 +++ openacs-4/packages/contacts/www/admin/ext-search-options.tcl 11 Nov 2005 22:57:08 -0000 1.3 @@ -9,7 +9,7 @@ {edit_p "f"} {delete_p "f"} {orderby "var_name,asc"} - {search_id ""} + {search_id:multiple ""} } set page_title [_ contacts.Extended_search_opt] @@ -97,7 +97,7 @@ lappend row_list \ action_buttons [list] } else { - set extra_query "where extend_id not in (select extend_id from contact_search_extend_map where search_id = $search_id)" + set extra_query "where extend_id not in (select extend_id from contact_search_extend_map where search_id in ([template::util::tcl_to_sql_list $search_id]))" lappend bulk_actions "[_ contacts.Set_default]" set-default "[_ contacts.Stored_extended_default]" lappend row_list \ checkbox [list] @@ -173,7 +173,7 @@ set def_extra_query "" if { [exists_and_not_null search_id] } { - set def_extra_query "where extend_id in (select extend_id from contact_search_extend_map where search_id = $search_id)" + set def_extra_query "where extend_id in (select extend_id from contact_search_extend_map where search_id in ([template::util::tcl_to_sql_list $search_id]))" } set def_bulk_actions [list "[_ contacts.Remove_default]" remove-default "[_ contacts.Remove_default_options]"]