Index: openacs-4/packages/dotlrn/sql/postgresql/community-memberships-packages-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/postgresql/community-memberships-packages-create.sql,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/dotlrn/sql/postgresql/community-memberships-packages-create.sql	9 Aug 2002 18:39:25 -0000	1.4
+++ openacs-4/packages/dotlrn/sql/postgresql/community-memberships-packages-create.sql	15 Aug 2002 18:00:49 -0000	1.5
@@ -235,7 +235,7 @@
         from dotlrn_ta_rels
         where rel_id = p_rel_id;
 
-        PERFORM dotlrn_admin_rel__delete(rel_id);
+        PERFORM dotlrn_admin_rel__delete(p_rel_id);
         
         return 0;
 END;
@@ -293,7 +293,7 @@
         from dotlrn_ca_rels
         where rel_id = p_rel_id;
 
-        PERFORM dotlrn_admin_rel__delete(rel_id);
+        PERFORM dotlrn_admin_rel__delete(p_rel_id);
         
         return 0;
 END;
@@ -351,7 +351,7 @@
         from dotlrn_cadmin_rels
         where rel_id = p_rel_id;
 
-        PERFORM dotlrn_admin_rel__delete(rel_id);
+        PERFORM dotlrn_admin_rel__delete(p_rel_id);
         
         return 0;
 END;
@@ -409,7 +409,7 @@
         from dotlrn_instructor_rels
         where rel_id = p_rel_id;
 
-        PERFORM dotlrn_admin_rel__delete(rel_id);
+        PERFORM dotlrn_admin_rel__delete(p_rel_id);
         
         return 0;
 END;