msgcat.pm upgrade bogosity, shrug, RT#4204

[freeside.git] / FS / FS / cust_main.pm

diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm
index c572bea..c7bcf67 100644 (file)
--- a/FS/FS/cust_main.pm
+++ b/FS/FS/cust_main.pm
@@ -36,7 +36,9 @@ use FS::cust_credit;
 use FS::cust_refund;
 use FS::part_referral;
 use FS::cust_main_county;
+use FS::tax_rate;
 use FS::cust_tax_location;
+use FS::part_pkg_taxrate;
 use FS::agent;
 use FS::cust_main_invoice;
 use FS::cust_credit_bill;
@@ -2278,6 +2280,7 @@ sub bill {
     warn "adding $taxname\n" if $DEBUG > 1;
     foreach my $taxitem ( @{ $taxname{$taxname} } ) {
       $tax += $tax{$taxitem} unless $seen{$taxitem};
+      $seen{$taxitem} = 1;
       warn "adding $tax{$taxitem}\n" if $DEBUG > 1;
     }
     next unless $tax;