Index: openacs-4/packages/acs-subsite/www/admin/groups/rel-type-remove-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/groups/rel-type-remove-2.tcl,v
diff -u -N -r1.6.2.1 -r1.6.2.2
--- openacs-4/packages/acs-subsite/www/admin/groups/rel-type-remove-2.tcl	16 May 2019 09:54:29 -0000	1.6.2.1
+++ openacs-4/packages/acs-subsite/www/admin/groups/rel-type-remove-2.tcl	13 Dec 2019 14:17:42 -0000	1.6.2.2
@@ -45,7 +45,7 @@
              where group_id = :group_id
                and rel_type = :rel_type
         }] } {
-            rel_segments_delete $segment_id
+            rel_segment::delete $segment_id
         }
 
         # now remove this relationship type from the list of allowable