diff options
Diffstat (limited to 'lib/WebService')
-rw-r--r-- | lib/WebService/ForecastIo/DataBlock.pm | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/lib/WebService/ForecastIo/DataBlock.pm b/lib/WebService/ForecastIo/DataBlock.pm index c01e1cf..9885c42 100644 --- a/lib/WebService/ForecastIo/DataBlock.pm +++ b/lib/WebService/ForecastIo/DataBlock.pm @@ -48,17 +48,13 @@ sub slice { my $from = $opts{from} // 0-'Inf'; my $to = $opts{to} // 0+'Inf'; - warn "slicing $from $to\n"; - return ref($self)->new({ summary => $self->summary, icon => $self->icon, data => [ - grep { - warn "looking at ".$_->time."\n"; - $_->time >= $from && $_->time <= $to } + grep { $_->time >= $from && $_->time <= $to } $self->data_points - ], + ], }); } |