From 757cf4d3e34f62a2f18e695ff6bd46c818c15298 Mon Sep 17 00:00:00 2001 From: Birte Kristina Friesel Date: Thu, 11 Apr 2024 20:57:20 +0200 Subject: $hafas->station: correctly determine 'name' and 'eva' --- lib/Travel/Status/DE/HAFAS.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/Travel/Status/DE/HAFAS.pm b/lib/Travel/Status/DE/HAFAS.pm index 6de7f35..a20d157 100644 --- a/lib/Travel/Status/DE/HAFAS.pm +++ b/lib/Travel/Status/DE/HAFAS.pm @@ -1111,7 +1111,7 @@ sub station { } } - my @prefcounts = sort { $b->[0] <=> $a->[0] } + my @prefcounts = sort { $b->[1] <=> $a->[1] } map { [ $_, $prefc_by_loc{$_} ] } keys %prefc_by_loc; if ( not @prefcounts ) { -- cgit v1.2.3