Unverified Commit b52cc329 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

EFA departure board: add (bit_)delayed annotations

parent 655addf1

lib/DBInfoscreen/Controller/Stationboard.pm

+9 −3
Original line number Diff line number Diff line
@@ -1524,6 +1524,9 @@ sub handle_efa { 
		elsif ( $linetype eq 'sonstige' ) {

			$linetype = 'ext';

		}



		my $delay = $result->delay;



		push(

			@departures,

			{
@@ -1548,7 +1551,10 @@ sub handle_efa { 
				platform     => $result->platform,

				is_cancelled => $result->is_cancelled,

				linetype     => $linetype,

				delay        => $result->delay,

				delay        => $delay,

				is_bit_delayed =>

				  ( $delay and $delay > 0 and $delay < 5 ? 1 : 0 ),

				is_delayed      => ( $delay and $delay >= 5 ? 1 : 0 ),

				occupancy       => $result->occupancy,

				replaced_by     => [],

				replacement_for => [],