summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorivan <ivan>2011-04-09 00:43:20 +0000
committerivan <ivan>2011-04-09 00:43:20 +0000
commitd821cd02b1a912662bd714d42164ecc42b69e506 (patch)
treef3eeae5c136debbac21a3030dba815f326932955
parentdf99e7e89b0c51056395f057efe7710bbaad0661 (diff)
should fix qis's intermittent backtraces when using an (ancient) counter-based cust_pay.paynum, RT#12317
-rw-r--r--FS/FS/cust_main/Billing_Realtime.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/FS/FS/cust_main/Billing_Realtime.pm b/FS/FS/cust_main/Billing_Realtime.pm
index 55517ad71..0ecf5498f 100644
--- a/FS/FS/cust_main/Billing_Realtime.pm
+++ b/FS/FS/cust_main/Billing_Realtime.pm
@@ -856,6 +856,7 @@ sub _realtime_bop_result {
if ( $error2 ) {
# gah. but at least we have a record of the state we had to abort in
# from cust_pay_pending now.
+ $dbh->rollback or die $dbh->errstr if $oldAutoCommit;
my $e = "WARNING: $options{method} captured but payment not recorded -".
" error inserting payment (". $payment_gateway->gateway_module.
"): $error2".