From e653b204c7da74200345c1718ffda973ec8c6cee Mon Sep 17 00:00:00 2001 From: Mark Wells Date: Thu, 18 Jun 2015 14:50:57 -0700 Subject: [PATCH] debug --- FS/FS/cust_credit.pm | 3 --- 1 file changed, 3 deletions(-) diff --git a/FS/FS/cust_credit.pm b/FS/FS/cust_credit.pm index 01ee89dc0..544a0e83d 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}}; -- 2.11.0