From 34a19ee1bf97edcc8a58fc83bc89ed2b43717670 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Tue, 27 Dec 2022 22:12:15 +0100 Subject: top trips: handle return trips --- lib/Travelynx/Model/Journeys.pm | 16 ++++++++++++++-- 1 file changed, 14 insertions(+), 2 deletions(-) (limited to 'lib') diff --git a/lib/Travelynx/Model/Journeys.pm b/lib/Travelynx/Model/Journeys.pm index 5721726..404567b 100755 --- a/lib/Travelynx/Model/Journeys.pm +++ b/lib/Travelynx/Model/Journeys.pm @@ -1342,8 +1342,20 @@ sub compute_review { my $single_trip_count = 0; for my $i ( 0 .. 3 ) { if ( $trips[$i] ) { - push( @{ $review{top_trips} }, - [ split( qr{[|]}, $trips[$i][0] ) ] ); + my ( $from, $to ) = split( qr{[|]}, $trips[$i][0] ); + my $found = 0; + for my $j ( 0 .. $i - 1 ) { + if ( $review{top_trip_count}[$j][0] eq $to + and $review{top_trip_count}[$j][2] eq $from ) + { + $review{top_trip_count}[$j][1] = '↔'; + $found = 1; + last; + } + } + if ( not $found ) { + push( @{ $review{top_trips} }, [ $from, '→', $to ] ); + } $top_trip_count += $trips[$i][1]; } } -- cgit v1.2.3