From fe4d698481f75a98f9ad9e069aa86431921ce864 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Wed, 26 Dec 2018 10:05:47 +0100 Subject: Ignore (apparently useless) ZOB stations entirely --- lib/Travel/Status/DE/IRIS.pm | 18 +++++++----------- 1 file changed, 7 insertions(+), 11 deletions(-) diff --git a/lib/Travel/Status/DE/IRIS.pm b/lib/Travel/Status/DE/IRIS.pm index 830c0b5..db96b21 100644 --- a/lib/Travel/Status/DE/IRIS.pm +++ b/lib/Travel/Status/DE/IRIS.pm @@ -213,17 +213,6 @@ sub get_station { push( @seen, $station ); $iter_depth++; - if ($station eq '8089317') { - # "München Hbf" (8000261) references "München ZOB (Hackerbrücke)" - # (8089317), which in turn references "München Hackerbrücke" - # (8004129)... which is a different station altogether and for added - # confusion has overlapping lines with München Hbf. - # - # To work around this, skip München ZOB (Hackerbrücke) entirely - # for now. - next; - } - my ( $raw, $err ) = $self->get_with_cache( $self->{main_cache}, $self->{iris_base} . '/station/' . $station ); @@ -263,6 +252,13 @@ sub get_station { push( @seen, $station_node->getAttribute('eva') ); + if ( $station_node->getAttribute('name') =~ m{ ZOB} ) { + + # There are no departures from a ZOB ("Zentraler Omnibus-Bahnhof" / + # Central Omnibus Station). Ignore it entirely. + next; + } + push( @ret, { -- cgit v1.2.3