Loading lib/Travel/Status/DE/IRIS.pm +7 −11 Original line number Diff line number Diff line Loading @@ -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 ); Loading Loading @@ -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, { Loading Loading
lib/Travel/Status/DE/IRIS.pm +7 −11 Original line number Diff line number Diff line Loading @@ -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 ); Loading Loading @@ -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, { Loading