projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
remove invoice deletion (and ancient & unused config settings), RT#37157
[freeside.git]
/
FS
/
FS
/
geocode_Mixin.pm
diff --git
a/FS/FS/geocode_Mixin.pm
b/FS/FS/geocode_Mixin.pm
index
57d8ca0
..
611b9e5
100644
(file)
--- 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;
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');
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 );
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 };
my $old = qsearchs('cust_main_county', \%hash);
if ( $old ) {
my $new = new FS::cust_main_county { $old->hash, %$tax_info };