From 2642fae2472be0cacbe926a394b690b2856b9a7b Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Tue, 8 Mar 2016 17:25:26 +0100 Subject: fix namespace clash (Mojo::...::any vs List::MoreUtils::any) --- index.pl | 11 ++++++++--- 1 file changed, 8 insertions(+), 3 deletions(-) (limited to 'index.pl') diff --git a/index.pl b/index.pl index 6ccab8d..89aa265 100644 --- a/index.pl +++ b/index.pl @@ -8,7 +8,7 @@ use DateTime::Format::Strptime; use Encode qw(decode); use File::Slurp qw(read_file write_file); use List::Util qw(first); -use List::MoreUtils qw(any); +use List::MoreUtils qw(); use App::VRR::Fakedisplay; use Travel::Status::DE::HAFAS; @@ -278,10 +278,15 @@ sub get_filtered_departures { # Note: The offset / countdown check does not yet take caching # into account, so it may be off by up to cache_expiry seconds. - if ( ( @grep_line and not( any { $line =~ $_ } @grep_line ) ) + if ( + ( + @grep_line + and not( List::MoreUtils::any { $line =~ $_ } @grep_line ) + ) or ( @grep_platform and not( $platform ~~ \@grep_platform ) ) or ( $opt{hide_regional} and $line =~ m{ ^ (RB | RE | IC | EC) }x ) - or ( $opt{offset} and $d->countdown < $opt{offset} ) ) + or ( $opt{offset} and $d->countdown < $opt{offset} ) + ) { next; } -- cgit v1.2.3