X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;ds=sidebyside;f=FS%2FFS%2Fdeploy_zone.pm;h=6ad355f723d9bf2613f4c9fcb405dac056ab0760;hb=3ffc2c0afc7d48282449be768bd2c36c2410e3c9;hp=71129cf44f8e242004e36f69e2e8978a172f5db3;hpb=0e1465cd691cb631528e7a7f83c641a18b6cef2f;p=freeside.git diff --git a/FS/FS/deploy_zone.pm b/FS/FS/deploy_zone.pm index 71129cf44..6ad355f72 100644 --- a/FS/FS/deploy_zone.pm +++ b/FS/FS/deploy_zone.pm @@ -383,7 +383,7 @@ sub process_block_lookup { returnGeometry => 'false', orderByFields => 'OID', ); - my $url = 'http://tigerweb.geo.census.gov/arcgis/rest/services/TIGERweb/Tracts_Blocks/MapServer/12/query'; + my $url = 'https://tigerweb.geo.census.gov/arcgis/rest/services/TIGERweb/Tracts_Blocks/MapServer/12/query'; my $ua = LWP::UserAgent->new; # first find out how many of these we're dealing with @@ -418,6 +418,7 @@ sub process_block_lookup { die $response->status_line unless $response->is_success; $data = decode_json($response->content); die $data->{error}{message} if $data->{error}; + last unless scalar @{$data->{features}}; #Nothing to insert foreach my $feature (@{ $data->{features} }) { my $geoid = $feature->{attributes}{GEOID}; # the prize