From 21f2f6d4bf1021936064064a081730734b42ddfc Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Sun, 5 Feb 2023 09:23:07 +0100 Subject: route_end: Some backend do not provide a route; fall back to dirTxt --- lib/Travel/Status/DE/HAFAS/Journey.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lib/Travel/Status/DE/HAFAS/Journey.pm b/lib/Travel/Status/DE/HAFAS/Journey.pm index 94052ed..c4320ba 100644 --- a/lib/Travel/Status/DE/HAFAS/Journey.pm +++ b/lib/Travel/Status/DE/HAFAS/Journey.pm @@ -89,6 +89,7 @@ sub new { my $class = $product->{cls}; my @stops; + my $route_end; for my $stop ( @{ $journey->{stopL} // [] } ) { my $loc = $locL[ $stop->{locX} ]; my $sched_arr = $stop->{aTimeS}; @@ -151,6 +152,7 @@ sub new { load => $tco, } ); + $route_end = $loc->{name}; } if ( $journey->{stbStop} ) { @@ -171,7 +173,7 @@ sub new { direction => $direction, is_cancelled => $is_cancelled, is_partially_cancelled => $partially_cancelled, - route_end => $stops[-1]{name}, + route_end => $route_end // $direction, messages => \@messages, route => \@stops, }; -- cgit v1.2.3