X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fcust_pay.pm;h=1ceb599a07163411792260d8c8b40991fe698c3d;hb=583902ab51f62551fe3620d98d42e72620edfa76;hp=d901c7811e4076822b0a198807f968fd9ac3737f;hpb=2295d728ff0bf2b692c97eb23fe76e38036ee631;p=freeside.git diff --git a/FS/FS/cust_pay.pm b/FS/FS/cust_pay.pm index d901c7811..1ceb599a0 100644 --- a/FS/FS/cust_pay.pm +++ b/FS/FS/cust_pay.pm @@ -150,6 +150,8 @@ sub insert { } } + $dbh->commit or die $dbh->errstr if $oldAutoCommit; + #false laziness w/ cust_credit::insert if ( $unsuspendauto && $old_balance && $cust_main->balance <= 0 ) { my @errors = $cust_main->unsuspend;