Mercurial > hg > egg-tcls

changeset 363:3917a1515e31

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fetch_weather: Fix parsing of "empty" CSV data.
author Matti Hamalainen <ccr@tnsp.org>
date Sat, 12 Dec 2015 12:25:30 +0200
parents e5a9aaf250b3
children 3b67c66fe0dc
files fetch_weather.pl
diffstat 1 files changed, 4 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- 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;
+          }
         }
       }