From d2866034f35b15db2bb5c8520c8b632fb5b4c2d0 Mon Sep 17 00:00:00 2001
From: dakkar <dakkar@thenautilus.net>
Date: Sat, 21 Mar 2020 17:26:13 +0000
Subject: remove compilation problems with newer perl+libs

---
 lib/WebService/ForecastIo/DataBlock.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lib/WebService/ForecastIo/DataBlock.pm')

diff --git a/lib/WebService/ForecastIo/DataBlock.pm b/lib/WebService/ForecastIo/DataBlock.pm
index 2b737ca..1994fa8 100644
--- a/lib/WebService/ForecastIo/DataBlock.pm
+++ b/lib/WebService/ForecastIo/DataBlock.pm
@@ -69,7 +69,7 @@ sub _spans {
             my $prev = $out->[-1]->value;
             $out->[-1]->_set_stop_time($dp->time);
             if (not $comp->($prev,$v)) { # new span
-                push $out, WebService::ForecastIo::DataSpan->new({
+                push @$out, WebService::ForecastIo::DataSpan->new({
                     start_time => $dp->time,
                     stop_time => $dp->time,
                     value => $v,
-- 
cgit v1.2.3