also show exit direction for regional trains at select stations

This commit is contained in:
Daniel Friesel 2019-06-23 18:46:25 +02:00
parent 16c441e433
commit 590b27f2ca
2 changed files with 26 additions and 0 deletions

View file

@ -2259,9 +2259,15 @@ sub startup {
my @route = @{ $in_transit->{route} // [] };
my @route_after;
my $stop_before_dest;
my $is_after = 0;
for my $station (@route) {
if ( $in_transit->{arr_name}
and $station->[0] eq $in_transit->{arr_name} )
{
$stop_before_dest = $route_after[-1][0];
}
if ($is_after) {
push( @route_after, $station );
}
@ -2376,6 +2382,14 @@ sub startup {
if ( $platform_info->{kopfgleis} ) {
$ret->{arr_direction} = $platform_info->{direction};
}
elsif ( $stop_before_dest
and exists $platform_info->{direction_from}
{$stop_before_dest} )
{
$ret->{arr_direction}
= $platform_info->{direction_from}
{$stop_before_dest};
}
elsif ( $in_transit->{data}{wagonorder_arr} ) {
my $wr;
eval {

View file

@ -1,5 +1,17 @@
<h1>Changelog</h1>
<div class="row">
<div class="col s12 m1 l1">
1.8
</div>
<div class="col s12 m11 l11">
<p>
<i class="material-icons left">add</i> Angabe der Ausstiegsseite für
einzelne Züge und Zielbahnhöfe.
</p>
</div>
</div>
<div class="row">
<div class="col s12 m1 l1">
1.7