From ba7cfd1a5a421e04061eab8f8a8c1e44cce3f441 Mon Sep 17 00:00:00 2001 From: Mark Wells Date: Sat, 16 May 2015 09:14:55 -0700 Subject: [PATCH] avoid overwriting secondary taxes during district tax updates, #34668 --- FS/FS/geocode_Mixin.pm | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/FS/FS/geocode_Mixin.pm b/FS/FS/geocode_Mixin.pm index 57d8ca0e8..611b9e5c1 100644 --- a/FS/FS/geocode_Mixin.pm +++ b/FS/FS/geocode_Mixin.pm @@ -236,6 +236,8 @@ sub process_district_update { my $class = shift; my $id = shift; + local $DEBUG = 1; + eval "use FS::Misc::Geo qw(get_district); use FS::Conf; use $class;"; die $@ if $@; die "$class has no location data" if !$class->can('location_hash'); @@ -255,6 +257,8 @@ sub process_district_update { my %hash = map { $_ => $tax_info->{$_} } qw( district city county state country ); + $hash{'taxname'} = ''; + my $old = qsearchs('cust_main_county', \%hash); if ( $old ) { my $new = new FS::cust_main_county { $old->hash, %$tax_info }; -- 2.11.0