summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorIvan Kohler <ivan@freeside.biz>2012-05-03 13:57:55 -0700
committerIvan Kohler <ivan@freeside.biz>2012-05-03 13:57:55 -0700
commitb77cf31ec6cf130ae8f19265fec49b62484060fb (patch)
treecaa20e8186db0147b932d5e6f264a36701fb5590
parent351a90553db4e68cc8855be30310cfd39cd63e65 (diff)
when un-cancelling a package, errors re-provisioning services are not fatal, RT#17518
-rw-r--r--FS/FS/cust_pkg.pm6
1 files changed, 4 insertions, 2 deletions
diff --git a/FS/FS/cust_pkg.pm b/FS/FS/cust_pkg.pm
index f01c5c3a6..9d81c67b3 100644
--- a/FS/FS/cust_pkg.pm
+++ b/FS/FS/cust_pkg.pm
@@ -889,7 +889,9 @@ sub cancel_if_expired {
locationnum, (other fields?). Attempts to re-provision cancelled services
using history information (errors at this stage are not fatal).
-cust_pkg: pass a scalar reference, will be filled in with
+cust_pkg: pass a scalar reference, will be filled in with the new cust_pkg object
+
+svc_fatal: service provisioning errors are fatal
svc_errors: pass an array reference, will be filled in with any provisioning errors
@@ -972,7 +974,7 @@ sub uncancel {
}
my $svc_error = $svc_x->insert;
- if ( $svc_error ) { #&& $options{svc_fatal} ) {
+ if ( $svc_error && $options{svc_fatal} ) {
$dbh->rollback if $oldAutoCommit;
return $error;
}