From fc9562f7901deb04afb548f9a02a314f4e1dc27a Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Mon, 12 Dec 2022 18:20:40 +0100 Subject: Improve "Betriebsstelle nicht bekannt" handling --- lib/Travelynx.pm | 8 ++++++++ 1 file changed, 8 insertions(+) (limited to 'lib/Travelynx.pm') diff --git a/lib/Travelynx.pm b/lib/Travelynx.pm index 4195001..046f947 100755 --- a/lib/Travelynx.pm +++ b/lib/Travelynx.pm @@ -1034,6 +1034,14 @@ sub startup { my ( $route_data, $journey, $polyline ) = @_; for my $station ( @{$route} ) { + if ( $station->[0] + =~ m{^Betriebsstelle nicht bekannt (\d+)$} ) + { + my $eva = $1; + if ( $route_data->{$eva} ) { + $station->[0] = $route_data->{$eva}{name}; + } + } $station->[1] = $route_data->{ $station->[0] }; } -- cgit v1.2.3