Index: openacs-4/packages/contacts/lib/contacts.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/lib/contacts.tcl,v
diff -u -r1.35 -r1.36
--- openacs-4/packages/contacts/lib/contacts.tcl	17 Nov 2005 18:22:02 -0000	1.35
+++ openacs-4/packages/contacts/lib/contacts.tcl	23 Nov 2005 17:28:44 -0000	1.36
@@ -33,7 +33,7 @@
 }
 
 # This is for showing the employee_id and employeer relationship
-set type_list [db_list get_object_type { }] 
+set type_list [db_list get_condition_type { }] 
 
 if { ![string equal [lsearch -exact $type_list "employees"] "-1"] } {
     set page_query_name "employees_pagination"