Index: openacs-4/packages/acs-subsite/tcl/party-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/Attic/party-procs.xql,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/acs-subsite/tcl/party-procs.xql	4 Jun 2006 00:45:42 -0000	1.3
+++ openacs-4/packages/acs-subsite/tcl/party-procs.xql	29 Jan 2007 12:27:02 -0000	1.4
@@ -43,5 +43,16 @@
 		party_id = :party_id
     </querytext>
 </fullquery>
+
+<fullquery name="party::party_p.party_p">
+    <querytext>
+	select
+		1
+	from 
+		parties
+	where
+		party_id = :object_id
+    </querytext>
+</fullquery>
  
 </queryset>