summaryrefslogtreecommitdiff
path: root/lib/DBInfoscreen/Controller
diff options
context:
space:
mode:
authorBirte Kristina Friesel <derf@finalrewind.org>2024-05-01 12:29:59 +0200
committerBirte Kristina Friesel <derf@finalrewind.org>2024-05-01 12:29:59 +0200
commit35bf3022330602242d0d8dbf7a7b2a7b2bd66e71 (patch)
tree8072db177e5bf95500f72e82fdc2857561a4e0c4 /lib/DBInfoscreen/Controller
parentf0bbf6b8ab0b9ad5c8f8503792cdc807731280ab (diff)
Indicate carriages belonging to other trains in carriage formation preview
Diffstat (limited to 'lib/DBInfoscreen/Controller')
-rw-r--r--lib/DBInfoscreen/Controller/Stationboard.pm19
1 files changed, 17 insertions, 2 deletions
diff --git a/lib/DBInfoscreen/Controller/Stationboard.pm b/lib/DBInfoscreen/Controller/Stationboard.pm
index 4d8406e..017e4f2 100644
--- a/lib/DBInfoscreen/Controller/Stationboard.pm
+++ b/lib/DBInfoscreen/Controller/Stationboard.pm
@@ -759,13 +759,19 @@ sub render_train {
or $wagon->is_powercar )
)
{
+ my $class;
if ($first) {
- push( @{ $departure->{wr_preview} }, '•' );
+ push(
+ @{ $departure->{wr_preview} },
+ [ '•', 'meta' ]
+ );
$first = 0;
+ say "-";
}
my $entry;
if ( $wagon->is_closed ) {
$entry = 'X';
+ $class = 'closed';
}
else {
$entry = $wagon->number
@@ -776,7 +782,16 @@ sub render_train {
: $wagon->type
);
}
- push( @{ $departure->{wr_preview} }, $entry );
+ if (
+ $group->train_no ne $departure->{train_no} )
+ {
+ $class = 'otherno';
+ }
+ say $entry;
+ push(
+ @{ $departure->{wr_preview} },
+ [ $entry, $class ]
+ );
}
}
$first = 1;