From 57dffc81dff9bbc724bb79cb7eaabc370deaa4da Mon Sep 17 00:00:00 2001 From: Birte Kristina Friesel Date: Wed, 27 Mar 2024 17:36:33 +0100 Subject: Journey: support ÖBB (and possibly other non-DB HAFAS) platforms MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- lib/Travel/Status/DE/HAFAS/Journey.pm | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) (limited to 'lib/Travel') 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' }; -- cgit v1.2.3