diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2018-10-30 12:17:16 -0700 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2018-10-30 12:17:16 -0700 |
| commit | d800198db4f59bd5369e0d1acbfeb3c7594c32c0 (patch) | |
| tree | 8ec7de1f3ebdd6d348ef0593a5171431d29e8f51 /FS/FS/cust_main_Mixin.pm | |
| parent | cbb7dce1f2db07e537fad4ccc8d7bf25e9419e1c (diff) | |
add option to limit automatic unsuspensions to a specific suspension reason type, RT#74448, RT#81634
Diffstat (limited to 'FS/FS/cust_main_Mixin.pm')
| -rw-r--r-- | FS/FS/cust_main_Mixin.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/FS/FS/cust_main_Mixin.pm b/FS/FS/cust_main_Mixin.pm index cceaa4b..6a2e905 100644 --- a/FS/FS/cust_main_Mixin.pm +++ b/FS/FS/cust_main_Mixin.pm @@ -737,7 +737,9 @@ sub unsuspend_balance { } my $balance = $cust_main->balance || 0; if ($balance <= $maxbalance) { - my @errors = $cust_main->unsuspend; + my @errors = $cust_main->unsuspend( + 'reason_type' => $conf->config('unsuspend_reason_type') + ); # side-fx with nested transactions? upstack rolls back? warn "WARNING:Errors unsuspending customer ". $cust_main->custnum. ": ". join(' / ', @errors) |