diff options
| author | ivan <ivan> | 2010-09-23 18:00:11 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2010-09-23 18:00:11 +0000 |
| commit | 97fcd64d7db5e90605126fd52f86e21efcd5cbec (patch) | |
| tree | 9e0052ca7bb4dd954e79e68fda4eb1dbf6cbbc18 | |
| parent | 4bbf4035783020c31df0358980ca54de5893851d (diff) | |
additional debug info, RT#10012
| -rw-r--r-- | FS/FS/cust_main/Billing.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/FS/FS/cust_main/Billing.pm b/FS/FS/cust_main/Billing.pm index 3638d00f2..8021d38bc 100644 --- a/FS/FS/cust_main/Billing.pm +++ b/FS/FS/cust_main/Billing.pm @@ -717,6 +717,7 @@ sub calculate_taxes { #move the cust_tax_exempt_pkg records to the cust_bill_pkgs we will commit my %packagemap = map { $_->pkgnum => $_ } @$cust_bill_pkg; + warn Dumper(\%packagemap) if $DEBUG > 2; foreach my $tax ( keys %$taxlisthash ) { foreach ( @{ $taxlisthash->{$tax} }[1 ... scalar(@{ $taxlisthash->{$tax} })] ) { next unless ref($_) eq 'FS::cust_bill_pkg'; |