PrivateCoffee/travelynx
4
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Improve "Betriebsstelle nicht bekannt" handling

Browse source
This commit is contained in:
Daniel Friesel 2022-12-12 18:20:40 +01:00
parent 5de6dfb4e1
commit fc9562f790
No known key found for this signature in database
GPG key ID: 100D5BFB5166E005
2 changed files with 11 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
lib/Travelynx.pm
View file

@ -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] };
}

4
lib/Travelynx/Helper/HAFAS.pm
View file

@ -124,7 +124,9 @@ sub get_route_timestamps_p {
my $station_is_past = 1;
for my $stop ( $journey->route ) {
my $name = $stop->{name};
$ret->{$name} = {
$ret->{$name} = $ret->{ $stop->{eva} } = {
name => $stop->{name},
eva => $stop->{eva},
sched_arr => _epoch( $stop->{sched_arr} ),
sched_dep => _epoch( $stop->{sched_dep} ),
rt_arr => _epoch( $stop->{rt_arr} ),