From 78a1f87b26cad0687ed176ab0a6e0028f0b80e5c Mon Sep 17 00:00:00 2001 From: Mark Wells Date: Thu, 21 Jul 2016 13:47:42 -0700 Subject: fix whitespace and case correctness of city names, #71501 --- FS/FS/TaxEngine/internal.pm | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'FS/FS/TaxEngine') diff --git a/FS/FS/TaxEngine/internal.pm b/FS/FS/TaxEngine/internal.pm index db7010c..3e3e7e5 100644 --- a/FS/FS/TaxEngine/internal.pm +++ b/FS/FS/TaxEngine/internal.pm @@ -28,8 +28,10 @@ sub add_sale { push @{ $self->{items} }, $cust_bill_pkg; - my @loc_keys = qw( district city county state country ); - my %taxhash = map { $_ => $location->get($_) } @loc_keys; + my %taxhash = map { $_ => $location->get($_) } + qw( district county state country ); + # city names in cust_main_county are uppercase + $taxhash{'city'} = uc($location->get('city')); $taxhash{'taxclass'} = $part_item->taxclass; -- cgit v1.1