Commit 04cc32b7 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

Fix wrong directions on long-distance arrivals

parent 7ef47cdb

lib/Travelynx.pm

+4 −2
Original line number Diff line number Diff line
@@ -2424,11 +2424,13 @@ sub startup { 
							{

								my $section_0 = ( $wr->sections )[0];

								my $direction = $wr->direction;

								if ( $section_0 eq 'A' and $direction == 0 ) {

								if (    $section_0->name eq 'A'

									and $direction == 0 )

								{

									$ret->{arr_direction}

									  = $platform_info->{direction};

								}

								elsif ( $section_0 ne 'A'

								elsif ( $section_0->name ne 'A'

									and $direction == 100 )

								{

									$ret->{arr_direction}