diff options
| author | Daniel Friesel <derf@finalrewind.org> | 2019-12-21 01:05:43 +0100 |
|---|---|---|
| committer | Daniel Friesel <derf@finalrewind.org> | 2019-12-21 01:05:43 +0100 |
| commit | 69568899ff68292fb4855bf5906fb3f56c72d9a7 (patch) | |
| tree | 2c21032875f7575ddd439e2bf8e2a94e46fb48cc /lib/DBInfoscreen/Controller | |
| parent | a668150460042c299aa33fdc411b93313ef5a7bc (diff) | |
set S-Bahn type for non-DB S-Bahn trains as well
Diffstat (limited to 'lib/DBInfoscreen/Controller')
| -rw-r--r-- | lib/DBInfoscreen/Controller/Stationboard.pm | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/lib/DBInfoscreen/Controller/Stationboard.pm b/lib/DBInfoscreen/Controller/Stationboard.pm index 79538a0..c3c720b 100644 --- a/lib/DBInfoscreen/Controller/Stationboard.pm +++ b/lib/DBInfoscreen/Controller/Stationboard.pm @@ -993,7 +993,8 @@ sub handle_request { # stops. This is a rare case, one point where it can be observed is # the TGV service at Frankfurt/Karlsruhe/Mannheim. if ( $route_info - and my @hafas_stations = @{ $route_info->{stations} } ) + and my @hafas_stations + = @{ $route_info->{stations} // [] } ) { if ( my @iris_stations = @{ $departures[-1]{route_pre_diff} } ) @@ -1059,7 +1060,7 @@ sub handle_request { } } } - if ( $route_info and @{ $route_info->{messages} } ) { + if ( $route_info and @{ $route_info->{messages} // [] } ) { my $him = $route_info->{messages}; my @him_messages; $departures[-1]{messages}{him} = $him; @@ -1174,6 +1175,11 @@ sub handle_request { { $linetype = 'ext'; } + elsif ( $departure->{train_line} + and $departure->{train_line} =~ m{^S\d} ) + { + $linetype = 'sbahn'; + } $self->render( '_train_details', |