diff options
author | levinse <levinse> | 2011-01-21 22:17:30 +0000 |
---|---|---|
committer | levinse <levinse> | 2011-01-21 22:17:30 +0000 |
commit | 0f7643c1af2d909e0c3172e5bec0c01855fca1b9 (patch) | |
tree | 44ef002a6a32f77b1a369a319ee10f1f597c0b82 /FS/FS/cust_bill.pm | |
parent | fd4aeda41e6b9318af8e367d761bb2b2c0a402f9 (diff) |
add (unfinished) credit card surcharge, part 1
Diffstat (limited to 'FS/FS/cust_bill.pm')
-rw-r--r-- | FS/FS/cust_bill.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/FS/FS/cust_bill.pm b/FS/FS/cust_bill.pm index f078342..62ab87f 100644 --- a/FS/FS/cust_bill.pm +++ b/FS/FS/cust_bill.pm @@ -1958,7 +1958,8 @@ sub realtime_lec { } sub realtime_bop { - my( $self, $method ) = @_; + my( $self, $method ) = (shift,shift); + my %opt = @_; my $cust_main = $self->cust_main; my $balance = $cust_main->balance; @@ -1987,6 +1988,7 @@ sub realtime_bop { #this didn't do what we want, it just calls apply_payments_and_credits # 'apply' => 1, 'apply_to_invoice' => 1, + %opt, #what we want: #this changes application behavior: auto payments #triggered against a specific invoice are now applied |