Guard against incomplete data in the MetOffice feed, if a period cont…

…ains no data then skip over it
MythTV · Aug 1, 2012 · b379de3 · b379de3
1 parent a9f18c6
commit b379de3
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 0 deletions.
diff --git a/mythplugins/mythweather/mythweather/scripts/uk_metoffice/metoffice_fivedayapi.pl b/mythplugins/mythweather/mythweather/scripts/uk_metoffice/metoffice_fivedayapi.pl
@@ -139,6 +139,10 @@
 
 foreach $item (@{$xml->{DV}->{Location}->{Period}}) {
 
+    if (ref($item->{Rep}) ne 'ARRAY') {
+        next;
+    }
+
     my ($ss,$mm,$hh,$day,$month,$year,$zone) = strptime($item->{val});
     $year += 1900; # Returns year as offset from 1900
     $month += 1; # Returns month starting at zero

diff --git a/mythplugins/mythweather/mythweather/scripts/uk_metoffice/metoffice_threehourapi.pl b/mythplugins/mythweather/mythweather/scripts/uk_metoffice/metoffice_threehourapi.pl
@@ -139,6 +139,10 @@
 
 foreach $item (@{$xml->{DV}->{Location}->{Period}}) {
 
+    if (ref($item->{Rep}) ne 'ARRAY') {
+        next;
+    }
+
     foreach my $rep (@{$item->{Rep}}) {
 
         my $datetime = DateTime::Format::ISO8601->parse_datetime(substr($item->{val}, 0, -1));