diff options
author | Birte Kristina Friesel <derf@finalrewind.org> | 2024-04-11 20:57:20 +0200 |
---|---|---|
committer | Birte Kristina Friesel <derf@finalrewind.org> | 2024-04-11 20:57:20 +0200 |
commit | 757cf4d3e34f62a2f18e695ff6bd46c818c15298 (patch) | |
tree | 72eb46f8767391bdd51fb223a27064d0e512ffec | |
parent | 22728aaab49ed08c89c053313779e09ee54b99a7 (diff) |
$hafas->station: correctly determine 'name' and 'eva'
-rw-r--r-- | lib/Travel/Status/DE/HAFAS.pm | 2 |
1 files changed, 1 insertions, 1 deletions
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 ) { |