diff options
author | Ivan Kohler <ivan@freeside.biz> | 2017-02-18 17:17:40 -0800 |
---|---|---|
committer | Ivan Kohler <ivan@freeside.biz> | 2017-02-18 17:17:40 -0800 |
commit | 76757a3112c37931defcdbbe952b5d8170f42802 (patch) | |
tree | 3cbc5bf5cee72897f739b741bedd37326bc3ab3f | |
parent | 248a2342f4ed3bff2b9d6111a76fad881bf56765 (diff) |
run schema upgrades for pkg_referral and cust_bill_pkg_discount
-rw-r--r-- | FS/FS/Upgrade.pm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/FS/FS/Upgrade.pm b/FS/FS/Upgrade.pm index bf79b9c07..691d28513 100644 --- a/FS/FS/Upgrade.pm +++ b/FS/FS/Upgrade.pm @@ -559,6 +559,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) @@ -568,6 +570,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; |