diff options
author | Mark Wells <mark@freeside.biz> | 2015-06-18 14:50:57 -0700 |
---|---|---|
committer | Mark Wells <mark@freeside.biz> | 2015-06-18 14:50:57 -0700 |
commit | e653b204c7da74200345c1718ffda973ec8c6cee (patch) | |
tree | 4252c5368ab104ca3236261933ae7b2e48520567 /FS/FS | |
parent | 09f899143460b0e99388ef007ff262f9a5e80203 (diff) |
debug
Diffstat (limited to 'FS/FS')
-rw-r--r-- | FS/FS/cust_credit.pm | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/FS/FS/cust_credit.pm b/FS/FS/cust_credit.pm index 01ee89d..544a0e8 100644 --- a/FS/FS/cust_credit.pm +++ b/FS/FS/cust_credit.pm @@ -822,8 +822,6 @@ Example: =cut -use Data::Dumper; #XXX - #maybe i should just be an insert with extra args instead of a class method sub credit_lineitems { my( $class, %arg ) = @_; @@ -887,7 +885,6 @@ sub credit_lineitems { # determine the tax adjustments my %tax_adjust = $class->calculate_tax_adjustment(%arg); - warn Dumper \%arg; foreach my $billpkgnum ( @{$arg{billpkgnums}} ) { my $setuprecur = shift @{$arg{setuprecurs}}; my $amount = shift @{$arg{amounts}}; |