diff options
| author | Mark Wells <mark@freeside.biz> | 2015-06-18 14:50:57 -0700 |
|---|---|---|
| committer | Mark Wells <mark@freeside.biz> | 2015-06-18 17:18:13 -0700 |
| commit | 513bf642296729d5ed50f78ed2278f7b922593dc (patch) | |
| tree | 06e02a10d5bd1d7cc7141c4bb4530937ad0317b7 /FS/FS/cust_credit.pm | |
| parent | 1376bb0613b54034173f248c7a2bfb45e30d9801 (diff) | |
debug
Diffstat (limited to 'FS/FS/cust_credit.pm')
| -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}}; |