Index: openacs-4/packages/xowiki/tcl/upgrade/upgrade.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/upgrade/upgrade.tcl,v diff -u -r1.15.2.17 -r1.15.2.18 --- openacs-4/packages/xowiki/tcl/upgrade/upgrade.tcl 25 Jun 2022 08:25:41 -0000 1.15.2.17 +++ openacs-4/packages/xowiki/tcl/upgrade/upgrade.tcl 25 Jun 2022 08:52:11 -0000 1.15.2.18 @@ -902,6 +902,19 @@ } } + set v 5.10.1d32 + if {[apm_version_names_compare $from_version_name $v] == -1 && + [apm_version_names_compare $to_version_name $v] > -1} { + ns_log notice "-- upgrading to $v" + + if {[::xo::dc 0or1row constraint_exists { + SELECT 1 FROM INFORMATION_SCHEMA.TABLE_CONSTRAINTS + WHERE CONSTRAINT_NAME ='xowiki_page_instance_page_template_fkey' + AND TABLE_NAME = 'xowiki_page_instance'}]} { + ::xo::dc dml alter_constraint \ + "alter table xowiki_page_instance alter constraint xowiki_page_instance_page_template_fkey DEFERRABLE INITIALLY DEFERRED" + } + } } }