diff options
author | Ivan Kohler <ivan@freeside.biz> | 2022-04-27 13:50:39 -0700 |
---|---|---|
committer | Ivan Kohler <ivan@freeside.biz> | 2022-04-27 13:50:39 -0700 |
commit | 314a04d3626bb2faaa5d3d4f0191d305a71d8ede (patch) | |
tree | b74d5168d77b4ed89d8e65bbbc95bfc07f934886 /FS/FS | |
parent | 0c1bbe3f62b483feb841b8b958dc468e1c457c45 (diff) |
restore correct workflow when no census match is found: offer map-based picker, RT#86245, RT#76968
Diffstat (limited to 'FS/FS')
-rw-r--r-- | FS/FS/Misc/Geo.pm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/FS/FS/Misc/Geo.pm b/FS/FS/Misc/Geo.pm index 3beffc8..6f923f5 100644 --- a/FS/FS/Misc/Geo.pm +++ b/FS/FS/Misc/Geo.pm @@ -166,9 +166,11 @@ sub get_censustract_uscensus { warn Dumper($content) if $DEBUG; - if ( $content->{result}->{addressMatches} ) { + my $addressMatches_ref = $content->{result}->{addressMatches}; - my $tract = $content->{result}->{addressMatches}[0]->{geographies}->{'Census Blocks'}[0]->{GEOID}; + if ( $addressMatches_ref && scalar @{$addressMatches_ref} ) { + + my $tract = $addressMatches_ref->[0]->{geographies}->{'Census Blocks'}[0]->{GEOID}; return $tract; } else { |