diff options
Diffstat (limited to 'lib/DBInfoscreen/Controller')
| -rw-r--r-- | lib/DBInfoscreen/Controller/Stationboard.pm | 19 | 
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; | 
