Index: openacs-4/packages/contacts/tcl/contact-search-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/tcl/contact-search-procs.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/contacts/tcl/contact-search-procs.tcl	14 Jun 2005 06:51:54 -0000	1.7
+++ openacs-4/packages/contacts/tcl/contact-search-procs.tcl	14 Jun 2005 07:25:18 -0000	1.8
@@ -32,6 +32,7 @@
                       [list owner_id $owner_id] \
                       [list all_or_any $all_or_any] \
                       [list object_type $object_type] \
+                      [list deleted_p $deleted_p] \
                       ]
 
     return [package_instantiate_object -var_list $var_list contact_search]