Index: openacs-4/packages/acs-tcl/tcl/membership-rel-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/Attic/membership-rel-procs-oracle.xql,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/acs-tcl/tcl/membership-rel-procs-oracle.xql 16 Mar 2002 01:32:21 -0000 1.1
+++ openacs-4/packages/acs-tcl/tcl/membership-rel-procs-oracle.xql 4 Jul 2002 13:43:52 -0000 1.2
@@ -17,7 +17,7 @@
- begin membership_rel.delete(rel_id => :rel_id); end;
+ begin membership_rel.deleted(rel_id => :rel_id); end;
Index: openacs-4/packages/acs-tcl/tcl/membership-rel-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/Attic/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 @@
- begin membership_rel__approve(rel_id => :rel_id); end;
+ begin return membership_rel__approve(:rel_id); end;
- begin membership_rel__ban(rel_id => :rel_id); end;
+ begin return membership_rel__ban(:rel_id); end;
- begin membership_rel__delete(rel_id => :rel_id); end;
+ begin return membership_rel__deleted(:rel_id); end;
- begin membership_rel__reject(rel_id => :rel_id); end;
+ begin return membership_rel__reject(:rel_id); end;
- begin membership_rel__unapprove(rel_id => :rel_id); end;
+ begin return membership_rel__unapprove(:rel_id); end;