From d6b324c6cc2863332c790924a1538dc7ac04ff0e Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Fri, 10 Jan 2014 10:57:56 +0100 Subject: db-iris: Fix --via --- bin/db-iris | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'bin/db-iris') diff --git a/bin/db-iris b/bin/db-iris index d25f40f..f81dc99 100755 --- a/bin/db-iris +++ b/bin/db-iris @@ -9,7 +9,7 @@ use DateTime; use DateTime::Format::Strptime; use Encode qw(decode); use Getopt::Long qw(:config no_ignore_case); -use List::Util qw(max); +use List::Util qw(first max); use Travel::Status::DE::IRIS; use Travel::Status::DE::IRIS::Stations; @@ -138,7 +138,7 @@ for my $d ( $status->results() ) { my @via; - @via = $d->route; + @via = $d->route_post; if ( $filter_via and not( first { $_ =~ m{$filter_via}io } @via ) ) { next; -- cgit v1.2.3