diff options
author | ivan <ivan> | 2007-07-13 23:52:32 +0000 |
---|---|---|
committer | ivan <ivan> | 2007-07-13 23:52:32 +0000 |
commit | bd8d2cd5fd7035e2775c72113aaeb6abc84dd73f (patch) | |
tree | 151eb3134d10671c3827c0ab0ee01ee2229a2583 /httemplate/edit/process/cust_main.cgi | |
parent | b257263d76ee23b94aefd5529de36c4b1b6d39ab (diff) |
fix race condition where ->apply_payments_and_credits could double-apply in rare cases
Diffstat (limited to 'httemplate/edit/process/cust_main.cgi')
-rwxr-xr-x | httemplate/edit/process/cust_main.cgi | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/httemplate/edit/process/cust_main.cgi b/httemplate/edit/process/cust_main.cgi index b270fc661..b27e722aa 100755 --- a/httemplate/edit/process/cust_main.cgi +++ b/httemplate/edit/process/cust_main.cgi @@ -145,9 +145,9 @@ % my $conf = new FS::Conf; % if ( $conf->exists('backend-realtime') && ! $error ) { % -% my $berror = $new->bill; -% $new->apply_payments_and_credits; -% $berror ||= $new->collect( 'realtime' => 1 ); +% my $berror = $new->bill +% || $new->apply_payments_and_credits +% || $new->collect( 'realtime' => 1 ); % warn "Warning, error billing during backend-realtime: $berror" if $berror; % % } |