Index: openacs-4/packages/acs-tcl/tcl/community-core-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/community-core-procs-postgresql.xql,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/acs-tcl/tcl/community-core-procs-postgresql.xql	16 Mar 2002 01:32:21 -0000	1.6
+++ openacs-4/packages/acs-tcl/tcl/community-core-procs-postgresql.xql	9 Aug 2002 20:02:27 -0000	1.7
@@ -27,4 +27,12 @@
       </querytext>
 </fullquery>
 
+<fullquery name="person::delete.delete_person">      
+      <querytext>
+
+	    select person__delete(:person_id);
+	
+      </querytext>
+</fullquery>
+
 </queryset>