summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Changelog2
-rwxr-xr-xbin/db-iris3
2 files changed, 4 insertions, 1 deletions
diff --git a/Changelog b/Changelog
index f7c5d33..2f89738 100644
--- a/Changelog
+++ b/Changelog
@@ -1,6 +1,8 @@
git HEAD
* IRIS / db-iris: Add lookahead option
+ * db-iris: Fix --via not matching destination of trains with incomplete
+ route data
Travel::Status::DE::IRIS 0.02 - Mon Feb 03 2014
diff --git a/bin/db-iris b/bin/db-iris
index 9ef3a60..a824fdd 100755
--- a/bin/db-iris
+++ b/bin/db-iris
@@ -272,7 +272,8 @@ for my $d ( $status->results() ) {
my @via;
- @via = $d->route_post;
+ # route may be incomplete, so check route_end as well
+ @via = ( $d->route_post, $d->route_end );
if ( ( $filter_via and not( first { $_ =~ m{$filter_via}io } @via ) )
or ( @grep_class and none { $_ ~~ \@grep_class } $d->classes )