From c65c85f3e23f3d4f5cc3f1faf70b6fb6e9578baa Mon Sep 17 00:00:00 2001
From: Daniel Friesel <derf@finalrewind.org>
Date: Sun, 12 Feb 2023 12:42:55 +0100
Subject: add bahn.expert link to train details page

---
 lib/DBInfoscreen/Controller/Stationboard.pm | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'lib/DBInfoscreen')

diff --git a/lib/DBInfoscreen/Controller/Stationboard.pm b/lib/DBInfoscreen/Controller/Stationboard.pm
index a81c7d5..05d4afb 100644
--- a/lib/DBInfoscreen/Controller/Stationboard.pm
+++ b/lib/DBInfoscreen/Controller/Stationboard.pm
@@ -1038,6 +1038,8 @@ sub station_train_details {
 				wr_link => $result->sched_departure
 				? $result->sched_departure->strftime('%Y%m%d%H%M')
 				: undef,
+				eva   => $result->station_uic,
+				start => $result->start,
 			};
 
 			$self->stash( title => $status->station->{name}
@@ -1174,6 +1176,7 @@ sub train_details {
 						);
 					}
 					my $station_info = shift( @{ $res->{route_post_diff} } );
+					$res->{eva} = $station_info->{eva};
 					if ( $station_info->{sched_arr} ) {
 						$res->{sched_arrival}
 						  = $station_info->{sched_arr}->strftime('%H:%M');
-- 
cgit v1.2.3