Index: openacs-4/packages/acs-subsite/tcl/group-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/group-procs.tcl,v
diff -u -N -r1.28 -r1.29
--- openacs-4/packages/acs-subsite/tcl/group-procs.tcl	23 Nov 2006 17:45:31 -0000	1.28
+++ openacs-4/packages/acs-subsite/tcl/group-procs.tcl	19 Dec 2006 09:05:18 -0000	1.29
@@ -702,6 +702,9 @@
     
     db_transaction {
         foreach rel_id $rel_id_list {
+	    # Remove it from the group_element_index
+	    db_dml delete "delete from group_element_index where rel_id = :rel_id"
+	    db_dml delete2 "delete from membership_rels where rel_id = :rel_id"
             relation_remove $rel_id
         }
     }