From 245809db1adb5a3d9e8c0262f7fc0fd00d12affe Mon Sep 17 00:00:00 2001 From: Birte Kristina Friesel Date: Mon, 23 Jun 2025 20:56:07 +0200 Subject: Stop: Support v1 platform specifiers ([ad]Pltf[RS].txt) --- lib/Travel/Status/DE/HAFAS/Stop.pm | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'lib') diff --git a/lib/Travel/Status/DE/HAFAS/Stop.pm b/lib/Travel/Status/DE/HAFAS/Stop.pm index 81fa170..acee919 100644 --- a/lib/Travel/Status/DE/HAFAS/Stop.pm +++ b/lib/Travel/Status/DE/HAFAS/Stop.pm @@ -41,8 +41,10 @@ sub new { # dIn. / aOut. -> may passengers enter / exit the train? - my $sched_platform = $stop->{aPlatfS} // $stop->{dPlatfS}; - my $rt_platform = $stop->{aPlatfR} // $stop->{dPlatfR}; + my $sched_platform = $stop->{aPlatfS} // $stop->{dPlatfS} + // $stop->{aPltfS}{txt} // $stop->{dPltfS}{txt}; + my $rt_platform = $stop->{aPlatfR} // $stop->{dPlatfR} + // $stop->{aPltfR}{txt} // $stop->{dPltfR}{txt}; my $changed_platform = $stop->{aPlatfCh} // $stop->{dPlatfCh}; my $arr_cancelled = $stop->{aCncl}; -- cgit v1.2.3