Index: openacs-4/packages/contacts/lib/contacts.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/lib/contacts.tcl,v
diff -u -r1.62 -r1.63
--- openacs-4/packages/contacts/lib/contacts.tcl	19 May 2006 09:38:46 -0000	1.62
+++ openacs-4/packages/contacts/lib/contacts.tcl	19 May 2006 18:10:59 -0000	1.63
@@ -213,7 +213,7 @@
     set object_type "party"
     set actual_object_type "party"
     set page_query_name "contacts_pagination"
-    set search_clause "[contact::search_clause -and -query $query -search_id "" -party_id "p.party_id" -limit_type_p "0"]"
+    set search_clause "[contact::search_clause -and -query $query -search_id "" -party_id "parties.party_id" -limit_type_p "0"]"
     if { $orderby eq "last_modified,desc" } {
 	set cr_from "cr_items, cr_revisions,"
 	set cr_where "and parties.party_id = cr_items.item_id and cr_items.live_revision = cr_revisions.revision_id"