Index: openacs-4/packages/contacts/lib/contacts.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/lib/contacts.xql,v
diff -u -r1.14 -r1.15
--- openacs-4/packages/contacts/lib/contacts.xql	21 Oct 2005 10:54:12 -0000	1.14
+++ openacs-4/packages/contacts/lib/contacts.xql	14 Nov 2005 20:42:03 -0000	1.15
@@ -48,4 +48,15 @@
     </querytext>
 </fullquery>
 
+<fullquery name="get_object_type">
+    <querytext>
+	select 
+		object_type 
+	from 
+		contact_searches 
+	where 
+		search_id = :search_id
+    </querytext>
+</fullquery>
+
 </queryset>