PrivateCoffee/travelynx
4
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

sort HAFAS/IRIS stations by distance

Browse source
This commit is contained in:
Birte Kristina Friesel 2023-08-20 16:52:09 +02:00
parent 3eda3beeae
commit 8f747fff91
No known key found for this signature in database
GPG key ID: 19E6E524EBB177BA
1 changed files with 6 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
lib/Travelynx/Controller/Traveling.pm
View file

@ -593,12 +593,15 @@ sub geolocation {
hafas => 1
}
} $hafas->results;
if ( @hafas > 5 ) {
@hafas = @hafas[ 0 .. 4 ];
if ( @hafas > 10 ) {
@hafas = @hafas[ 0 .. 9 ];
}
my @results = map { $_->[0] }
sort { $a->[1] <=> $b->[1] }
map { [ $_, $_->{distance} ] } ( @iris, @hafas );
$self->render(
json => {
candidates => [ @iris, @hafas ],
candidates => [@results],
}
);
}