From aa1a5ed571f6a87f512f8afa706160d1dd9800f8 Mon Sep 17 00:00:00 2001
From: Daniel Friesel <derf@finalrewind.org>
Date: Sun, 3 Jan 2021 09:34:55 +0100
Subject: show "section A"-based wagon order if heuristic is unavailable

---
 lib/DBInfoscreen/Controller/Stationboard.pm | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

(limited to 'lib/DBInfoscreen/Controller/Stationboard.pm')

diff --git a/lib/DBInfoscreen/Controller/Stationboard.pm b/lib/DBInfoscreen/Controller/Stationboard.pm
index b951ed8..b591208 100644
--- a/lib/DBInfoscreen/Controller/Stationboard.pm
+++ b/lib/DBInfoscreen/Controller/Stationboard.pm
@@ -539,6 +539,9 @@ sub render_train {
 			if ($direction) {
 				$departure->{direction} = $direction;
 			}
+			elsif ( $platform_info->{direction} ) {
+				$departure->{direction} = 'a' . $platform_info->{direction};
+			}
 
 			return;
 		},
@@ -678,7 +681,8 @@ sub render_train {
 				dt_now       => DateTime->now( time_zone => 'Europe/Berlin' ),
 				station_name => $station_name,
 				nav_link =>
-				  $self->url_for( 'station', station => $station_name)->query({detailed => $self->param('detailed')}),
+				  $self->url_for( 'station', station => $station_name )
+				  ->query( { detailed => $self->param('detailed') } ),
 			);
 		}
 	)->wait;
@@ -1237,7 +1241,8 @@ sub handle_result {
 				  or $template eq 'multi'
 			),
 			force_mobile => ( $template eq 'app' ),
-			nav_link => $self->url_for( 'station', station => $station_name)->query({detailed => $self->param('detailed')}),
+			nav_link => $self->url_for( 'station', station => $station_name )
+			  ->query( { detailed => $self->param('detailed') } ),
 		);
 	}
 	return;
-- 
cgit v1.2.1