Commit 596f6deb authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

show wagon order even if exact positions on platform are unknown

parent ec5737ed

lib/DBInfoscreen/Controller/Wagenreihung.pm

+11 −0
Original line number Diff line number Diff line
@@ -16,6 +16,17 @@ sub wagenreihung { 
		train_number => $train,

	);



	if ( $wr->has_bad_wagons ) {



		# create fake positions as the correct ones are not available

		my $pos = 0;

		for my $wagon ( $wr->wagons ) {

			$wagon->{position}{start_percent} = $pos;

			$wagon->{position}{end_percent}   = $pos + 4;

			$pos += 4;

		}

	}



	$self->render(

		'wagenreihung',

		wr        => $wr,

templates/wagenreihung.html.ep

+10 −6
Original line number Diff line number Diff line
@@ -32,12 +32,14 @@ 
%   }

  <div class="container">

    <div style="position: relative; width: 100%; height: 60ex;">

%     if (not $wr->has_bad_wagons) {

%       for my $section ($wr->sections) {

          <div style="position: absolute; left: 1em; width: 2em;

          top: <%= $section->{start_percent} %>%; bottom: <%= 100 - $section->{end_percent} %>%; text-align: center;">

%=          $section->{name}

          </div>

%       }

%     }

%     for my $wagon ($wr->wagons) {

%       my $bg = '';

%       if ($wagon->is_first_class) {
@@ -48,7 +50,9 @@ 
%       }

        <div style="position: absolute; left: 6em;

        top: <%= $wagon->{position}{start_percent} %>%; bottom: <%= 100 - $wagon->{position}{end_percent} %>%;">

%         if ($wr->direction == 100) {

%         if ($wr->has_bad_wagons) {

%         }

%         elsif ($wr->direction == 100) {

            ↓

%         }

%         else {