diff options
author | Birte Kristina Friesel <derf@finalrewind.org> | 2025-06-19 11:16:54 +0200 |
---|---|---|
committer | Birte Kristina Friesel <derf@finalrewind.org> | 2025-06-19 11:16:54 +0200 |
commit | ce5c762f474d375999bc96071fe0a061507312f3 (patch) | |
tree | d2cb62c01b6d542de48d0ea9f12853776b72a256 /lib/DBInfoscreen/Controller/Stationboard.pm | |
parent | cc47175ef60ad5b13182c8049e6530907924e8de (diff) |
EFA: Use trip IDs with time data introduced in v3.124.37.5
Diffstat (limited to 'lib/DBInfoscreen/Controller/Stationboard.pm')
-rw-r--r-- | lib/DBInfoscreen/Controller/Stationboard.pm | 23 |
1 files changed, 10 insertions, 13 deletions
diff --git a/lib/DBInfoscreen/Controller/Stationboard.pm b/lib/DBInfoscreen/Controller/Stationboard.pm index 352047f..a169e27 100644 --- a/lib/DBInfoscreen/Controller/Stationboard.pm +++ b/lib/DBInfoscreen/Controller/Stationboard.pm @@ -1517,12 +1517,15 @@ sub train_details_efa { my $trip_id = $self->stash('train'); my $stopseq; - if ( $trip_id =~ m{ ^ ([^@]*) @ ([^@]*) [(] ([^)]*) [)] (.*) $ }x ) { + if ( $trip_id + =~ m{ ^ ([^@]*) @ ([^@]*) [(] ([^T]*) T ([^)]*) [)] (.*) $ }x ) + { $stopseq = { stateless => $1, stop_id => $2, date => $3, - key => $4 + time => $4, + key => $5 }; } else { @@ -2165,17 +2168,11 @@ sub render_board_efa { departure => $result->rt_datetime ? $result->rt_datetime->strftime('%H:%M') : undef, - train => $result->line, - train_type => q{}, - train_line => $result->line, - train_no => $result->train_no, - journey_id => sprintf( '%s@%d(%s)%d', - $result->stateless =~ s{ }{}gr, - scalar $result->route_pre - ? ( $result->route_pre )[0]->id_num - : $result->stop_id_num, - $result->sched_datetime->strftime('%Y%m%d'), - $result->key ), + train => $result->line, + train_type => q{}, + train_line => $result->line, + train_no => $result->train_no, + journey_id => $result->id, via => [ map { $_->name } $result->route_interesting ], origin => $result->origin, destination => $result->destination, |