diff options
| author | Mark Wells <mark@freeside.biz> | 2015-03-30 16:22:06 -0700 |
|---|---|---|
| committer | Mark Wells <mark@freeside.biz> | 2015-03-30 16:22:06 -0700 |
| commit | 360d113520c4ecf8c8cfdd731ad0a1d4bb06f18d (patch) | |
| tree | 0d8fcb214b4e3f7b1d0c27b062aa472a853feed4 | |
| parent | 51b67436d595b43c197e83b60898cd99acf402dd (diff) | |
don't enforce service quantity limits during location change, #33731
| -rw-r--r-- | FS/FS/cust_pkg.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/FS/FS/cust_pkg.pm b/FS/FS/cust_pkg.pm index 7f9c96013..5f2cd830b 100644 --- a/FS/FS/cust_pkg.pm +++ b/FS/FS/cust_pkg.pm @@ -2081,7 +2081,9 @@ sub change { } # Transfer services and cancel old package. - + # Enforce service limits only if this is a pkgpart change. + local $FS::cust_svc::ignore_quantity; + $FS::cust_svc::ignore_quantity = 1 if $same_pkgpart; $error = $self->transfer($cust_pkg); if ($error and $error == 0) { # $old_pkg->transfer failed. |