diff options
| author | Birte Kristina Friesel <derf@finalrewind.org> | 2024-03-27 17:36:33 +0100 |
|---|---|---|
| committer | Birte Kristina Friesel <derf@finalrewind.org> | 2024-03-27 17:36:33 +0100 |
| commit | 57dffc81dff9bbc724bb79cb7eaabc370deaa4da (patch) | |
| tree | 5d68004a031ebf410948d4b5e9369b87ea64e124 | |
| parent | 1e7d9d019865e58eb63d2c4501adb15fc3e888c8 (diff) | |
Journey: support ÖBB (and possibly other non-DB HAFAS) platforms
| -rw-r--r-- | lib/Travel/Status/DE/HAFAS/Journey.pm | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/lib/Travel/Status/DE/HAFAS/Journey.pm b/lib/Travel/Status/DE/HAFAS/Journey.pm index f7206e8..d999ca1 100644 --- a/lib/Travel/Status/DE/HAFAS/Journey.pm +++ b/lib/Travel/Status/DE/HAFAS/Journey.pm @@ -167,9 +167,11 @@ sub new { if ( $journey->{stbStop} ) { $ref->{station} = $locL->[ $journey->{stbStop}{locX} ]->name; $ref->{station_eva} = 0 + $locL->[ $journey->{stbStop}{locX} ]->eva; - $ref->{sched_platform} = $journey->{stbStop}{dPlatfS}; - $ref->{rt_platform} = $journey->{stbStop}{dPlatfR}; - $ref->{platform} = $ref->{rt_platform} // $ref->{sched_platform}; + $ref->{sched_platform} = $journey->{stbStop}{dPlatfS} + // $journey->{stbStop}{dPltfS}{txt}; + $ref->{rt_platform} = $journey->{stbStop}{dPlatfR} + // $journey->{stbStop}{dPltfR}{txt}; + $ref->{platform} = $ref->{rt_platform} // $ref->{sched_platform}; my $time_s = $journey->{stbStop}{ $hafas->{arrivals} ? 'aTimeS' : 'dTimeS' }; |