summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDaniel Friesel <derf@finalrewind.org>2019-06-25 20:19:21 +0200
committerDaniel Friesel <derf@finalrewind.org>2019-06-25 20:19:21 +0200
commit04cc32b7a00d30397e928238120bdbb938229e14 (patch)
tree468548024f1883c747dddc7fb3d3a85a9e8a7398
parent7ef47cdbf999429977a2d2f02f3dce3c9f0123c0 (diff)
Fix wrong directions on long-distance arrivals
-rwxr-xr-xlib/Travelynx.pm6
1 files changed, 4 insertions, 2 deletions
diff --git a/lib/Travelynx.pm b/lib/Travelynx.pm
index df1d970..aee93a5 100755
--- a/lib/Travelynx.pm
+++ b/lib/Travelynx.pm
@@ -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}