diff options
-rw-r--r-- | FS/FS/tax_rate_location.pm | 15 |
1 files changed, 8 insertions, 7 deletions
diff --git a/FS/FS/tax_rate_location.pm b/FS/FS/tax_rate_location.pm index b4be8b9..aeb14d3 100644 --- a/FS/FS/tax_rate_location.pm +++ b/FS/FS/tax_rate_location.pm @@ -234,13 +234,14 @@ sub batch_import { $hash->{disabled} = ''; my $tax_rate_location = qsearchs('tax_rate_location', $hash); - return "Can't find tax_rate_location to delete: ". - join(" ", map { "$_ => ". $hash->{$_} } @fields) - unless $tax_rate_location; - - $tax_rate_location->disabled('Y'); - my $error = $tax_rate_location->replace; - return $error if $error; + if ( $tax_rate_location ) { + $tax_rate_location->disabled('Y'); + my $error = $tax_rate_location->replace; + return $error if $error; + } else { + warn "WARNING: Can't find tax_rate_location to delete, continuing update anyway: ". + join(" ", map { "$_ => ". $hash->{$_} } @fields); + } delete($hash->{$_}) foreach (keys %$hash); } |