diff options
author | Ivan Kohler <ivan@freeside.biz> | 2017-02-18 17:17:38 -0800 |
---|---|---|
committer | Ivan Kohler <ivan@freeside.biz> | 2017-02-18 17:17:38 -0800 |
commit | 895667aa1cf8e9d136043881284df2c9423d1d1e (patch) | |
tree | 3a882ff9cf355aa07dfe898daa458963b721ff6d /FS/FS/Upgrade.pm | |
parent | 4fe1fd639d387e1a3d271618b35830142583c714 (diff) |
run schema upgrades for pkg_referral and cust_bill_pkg_discount
Diffstat (limited to 'FS/FS/Upgrade.pm')
-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 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; |