Index: openacs-4/packages/contacts/lib/contacts.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/lib/contacts.tcl,v
diff -u -N -r1.59 -r1.60
--- openacs-4/packages/contacts/lib/contacts.tcl	10 May 2006 20:55:37 -0000	1.59
+++ openacs-4/packages/contacts/lib/contacts.tcl	12 May 2006 21:16:30 -0000	1.60
@@ -205,7 +205,7 @@
 # }
 if { [exists_and_not_null search_id] } {
 
-    set object_type [db_string get_object_type {}]
+    set object_type [db_string get_object_type {} -default {party}]
     switch $object_type {
 	person { 
 	    set page_query_name "person_pagination"