# HG changeset patch
# User Matti Hamalainen <ccr@tnsp.org>
# Date 1454863776 -7200
# Node ID 1ba1191da15d2bed2df389bed98de9442bdcf07e
# Parent  5573c1681da90c2dfa666b387bd5de27427e44b4
fetch_weather: Check for empty station name.

diff -r 5573c1681da9 -r 1ba1191da15d fetch_weather.pl
--- a/fetch_weather.pl	Sun Feb 07 18:49:11 2016 +0200
+++ b/fetch_weather.pl	Sun Feb 07 18:49:36 2016 +0200
@@ -372,7 +372,7 @@
         foreach my $wdata (@{$data->{"roadweatherdata"}{"roadweather"}})
         {
           my $wid = $wdata->{"stationid"};
-          if (defined($meta_data->{$wid}))
+          if (defined($meta_data->{$wid}) && $meta_data->{$wid}[2] ne "")
           {
             $nrecords++;
             $weatherdata->{$meta_data->{$wid}[2]} =
@@ -488,7 +488,8 @@
           # Should use a hash -
           foreach my $flol (@farray)
           {
-            if ($flol->{"lat"} == $flat && $flol->{"long"} == $flong)
+            if ($flol->{"lat"} == $flat && $flol->{"long"} == $flong &&
+                $floc->{"gml:name"} ne "")
             {
               $nrecords++;
               $weatherdata->{$floc->{"gml:name"}} =