From e0dd609554556f4475c49b8e2be795540eb67a15 Mon Sep 17 00:00:00 2001 From: dakkar Date: Sat, 9 Dec 2023 14:07:05 +0000 Subject: sort buses --- lib/WebService/TFL/Bus/Response.pm | 1 + 1 file changed, 1 insertion(+) diff --git a/lib/WebService/TFL/Bus/Response.pm b/lib/WebService/TFL/Bus/Response.pm index 6cba172..0f811fc 100644 --- a/lib/WebService/TFL/Bus/Response.pm +++ b/lib/WebService/TFL/Bus/Response.pm @@ -14,6 +14,7 @@ sub new_from_response { return $class->new({ predictions => [ + sort { $a->expectedArrival <=> $b->expectedArrival } map { WebService::TFL::Bus::Prediction->new_from_response($_) } grep { $_->{'$type'} =~ /\bPrediction\b/ } $response_data->@* -- cgit v1.2.3