diff options
Diffstat (limited to 'lib')
| -rwxr-xr-x | lib/Travelynx.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lib/Travelynx.pm b/lib/Travelynx.pm index 7a4b6ca..4f6e839 100755 --- a/lib/Travelynx.pm +++ b/lib/Travelynx.pm @@ -1934,6 +1934,10 @@ sub startup { if ( $stationboard->{errstr} ) { return; } + @{ $stationboard->{results} } = map { $_->[0] } + sort { $a->[1] <=> $b->[1] } + map { [ $_, $_->departure ? $_->departure->epoch : 0 ] } + @{ $stationboard->{results} }; my @results; my %via_count = map { $_ => 0 } @destinations; for my $train ( @{ $stationboard->{results} } ) { @@ -1967,7 +1971,7 @@ sub startup { map { [ $_, - $_->[0]->departure->epoch // $_->[0]->sched_departur->epoch + $_->[0]->departure->epoch // $_->[0]->sched_departure->epoch ] } @results; |