From 895667aa1cf8e9d136043881284df2c9423d1d1e Mon Sep 17 00:00:00 2001 From: Ivan Kohler Date: Sat, 18 Feb 2017 17:17:38 -0800 Subject: [PATCH] run schema upgrades for pkg_referral and cust_bill_pkg_discount --- FS/FS/Upgrade.pm | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/FS/FS/Upgrade.pm b/FS/FS/Upgrade.pm index 27c4b4ca6..a59dc1fc9 100644 --- a/FS/FS/Upgrade.pm +++ b/FS/FS/Upgrade.pm @@ -553,6 +553,8 @@ sub upgrade_schema { sub upgrade_schema_data { my %opt = @_; + #auto-find tables/classes with an _update_schema method? + tie my %hash, 'Tie::IxHash', #fix classnum character(1) @@ -562,6 +564,9 @@ sub upgrade_schema_data { #remove possible dangling records 'password_history' => [], 'cust_pay_pending' => [], + #remove records referencing removed things with their FKs + 'pkg_referral' => [], + 'cust_bill_pkg_discount' => [], ; \%hash; -- 2.11.0