From: ivan Date: Thu, 23 Sep 2010 18:02:33 +0000 (+0000) Subject: additional debug info, RT#10012 X-Git-Tag: TORRUS_1_0_9~274 X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=809450eeedfb9fc86157587e135fd82c94c290fc additional debug info, RT#10012 --- diff --git a/FS/FS/cust_main/Billing.pm b/FS/FS/cust_main/Billing.pm index 8021d38bc..d24221ebb 100644 --- a/FS/FS/cust_main/Billing.pm +++ b/FS/FS/cust_main/Billing.pm @@ -722,6 +722,7 @@ sub calculate_taxes { foreach ( @{ $taxlisthash->{$tax} }[1 ... scalar(@{ $taxlisthash->{$tax} })] ) { next unless ref($_) eq 'FS::cust_bill_pkg'; + warn $_->pkgnum."\n" if $DEBUG > 2; push @{ $packagemap{$_->pkgnum}->_cust_tax_exempt_pkg }, splice( @{ $_->_cust_tax_exempt_pkg } ); }