summaryrefslogtreecommitdiff
path: root/lib/DBInfoscreen
diff options
context:
space:
mode:
authorDaniel Friesel <derf@finalrewind.org>2023-02-12 12:42:55 +0100
committerDaniel Friesel <derf@finalrewind.org>2023-02-12 12:42:55 +0100
commitc65c85f3e23f3d4f5cc3f1faf70b6fb6e9578baa (patch)
treedbcdf3428f9a157b98053e2becd3e7893dce6843 /lib/DBInfoscreen
parent80c9068e98d2c10f116dd52f9d51ff892936dae5 (diff)
add bahn.expert link to train details page
Diffstat (limited to 'lib/DBInfoscreen')
-rw-r--r--lib/DBInfoscreen/Controller/Stationboard.pm3
1 files changed, 3 insertions, 0 deletions
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');