summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDaniel Friesel <derf@finalrewind.org>2016-03-08 17:25:26 +0100
committerDaniel Friesel <derf@finalrewind.org>2016-03-08 17:25:26 +0100
commit2642fae2472be0cacbe926a394b690b2856b9a7b (patch)
tree794e065ae0a6cf7ac32de6a03432eb76c67c0ad7
parent68d667821c317ecaeb62e33c8911e5b9990ff2ce (diff)
fix namespace clash (Mojo::...::any vs List::MoreUtils::any)
-rw-r--r--index.pl11
1 files changed, 8 insertions, 3 deletions
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;
}