# HG changeset patch
# User Matti Hamalainen <ccr@tnsp.org>
# Date 1449915930 -7200
# Node ID 3917a1515e31814993ffbaa10453ab2d090b34b8
# Parent  e5a9aaf250b3fb222313c4c83e847e79638eefdb
fetch_weather: Fix parsing of "empty" CSV data.

diff -r e5a9aaf250b3 -r 3917a1515e31 fetch_weather.pl
--- a/fetch_weather.pl	Sat Dec 12 11:38:42 2015 +0200
+++ b/fetch_weather.pl	Sat Dec 12 12:25:30 2015 +0200
@@ -359,7 +359,10 @@
         if (defined($line) && $csv->parse($line))
         {
           my @fields = $csv->fields();
-          $$meta_data{$fields[1]} = \@fields;
+          if (scalar(@fields) > 1)
+          {
+            $$meta_data{$fields[1]} = \@fields;
+          }
         }
       }