# HG changeset patch
# User Matti Hamalainen <ccr@tnsp.org>
# Date 1450426055 -7200
# Node ID 1ca8ae1950772c14432689556057e35679234a8a
# Parent  1c9a40b47cd548f86a2955dd23bc0b353b05f319
fetch_weather: Fix parsing of old/cached datafile.

diff -r 1c9a40b47cd5 -r 1ca8ae195077 fetch_weather.pl
--- a/fetch_weather.pl	Thu Dec 17 19:27:08 2015 +0200
+++ b/fetch_weather.pl	Fri Dec 18 10:07:35 2015 +0200
@@ -285,7 +285,7 @@
   {
     foreach my $line (split(/\s*\n\s*/, $str))
     {
-      my @mtmp = split(/\|/, $line);
+      my @mtmp = split(/\|/, $line, -1);
       if (scalar(\@mtmp) >= 3)
       {
         $weatherdata->{shift @mtmp} = \@mtmp;