summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMark Wells <mark@freeside.biz>2015-03-23 17:31:01 -0700
committerMark Wells <mark@freeside.biz>2015-03-23 17:31:01 -0700
commit725a774d23a1f9a1869929b3293ffd37df2f05f9 (patch)
tree6f88349d8d89ec8a4ce5c7cc3071b6cf2fda1d82
parent5f4099e52bd894d644c676ea75e1b0cb588393c8 (diff)
don't enforce service quantity limits during location change, #33371
-rw-r--r--FS/FS/cust_pkg.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/FS/FS/cust_pkg.pm b/FS/FS/cust_pkg.pm
index efe35efa3..bafbb58f4 100644
--- a/FS/FS/cust_pkg.pm
+++ b/FS/FS/cust_pkg.pm
@@ -2033,7 +2033,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.