Index: openacs-4/packages/acs-tcl/tcl/membership-rel-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/membership-rel-procs-postgresql.xql,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/acs-tcl/tcl/membership-rel-procs-postgresql.xql	16 Mar 2002 01:32:21 -0000	1.1
+++ openacs-4/packages/acs-tcl/tcl/membership-rel-procs-postgresql.xql	4 Jul 2002 13:43:52 -0000	1.2
@@ -5,31 +5,31 @@
 
     <fullquery name="membership_rel::change_state.approve">
         <querytext>
-            begin membership_rel__approve(rel_id => :rel_id); end;
+            begin return membership_rel__approve(:rel_id); end;
         </querytext>
     </fullquery>
 
     <fullquery name="membership_rel::change_state.ban">
         <querytext>
-            begin membership_rel__ban(rel_id => :rel_id); end;
+            begin return membership_rel__ban(:rel_id); end;
         </querytext>
     </fullquery>
 
     <fullquery name="membership_rel::change_state.delete">
         <querytext>
-            begin membership_rel__delete(rel_id => :rel_id); end;
+            begin return membership_rel__deleted(:rel_id); end;
         </querytext>
     </fullquery>
 
     <fullquery name="membership_rel::change_state.reject">
         <querytext>
-            begin membership_rel__reject(rel_id => :rel_id); end;
+            begin return membership_rel__reject(:rel_id); end;
         </querytext>
     </fullquery>
 
     <fullquery name="membership_rel::change_state.unapprove">
         <querytext>
-            begin membership_rel__unapprove(rel_id => :rel_id); end;
+            begin return membership_rel__unapprove(:rel_id); end;
         </querytext>
     </fullquery>