Index: openacs-4/packages/acs-subsite/tcl/rel-types-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/rel-types-procs.tcl,v
diff -u -N -r1.19 -r1.19.2.1
--- openacs-4/packages/acs-subsite/tcl/rel-types-procs.tcl	30 Sep 2018 15:43:18 -0000	1.19
+++ openacs-4/packages/acs-subsite/tcl/rel-types-procs.tcl	18 Apr 2019 09:12:32 -0000	1.19.2.1
@@ -170,7 +170,7 @@
                 create table $table_name (
                      rel_id integer
                             constraint $fk_constraint_name
-                            references $references_table ($references_column)
+                            references $references_table ($references_column) on delete cascade
                             constraint $pk_constraint_name primary key
                    )}]} errmsg]} {