passenger rights: show departures with delay ≥ 20 minutes as wellHEAD2.8.40main

This is a quick workaround until I have finally reviewed #116

1 files changed, 5 insertions, 2 deletions

diff --git a/lib/Travelynx/Controller/Passengerrights.pm b/lib/Travelynx/Controller/Passengerrights.pm
index d80f1ae..5759d2e 100644
--- a/lib/Travelynx/Controller/Passengerrights.pm
+++ b/lib/Travelynx/Controller/Passengerrights.pm
@@ -121,6 +121,8 @@ sub list_candidates {
 		}
 	}
 
+	my @abo_journeys
+	  = grep { $_->{delay} >= 20 and $_->{delay} < 60 } @journeys;
 	@journeys = grep { $_->{delay} >= 60 or $_->{connection_missed} } @journeys;
 
 	my @cancelled = $self->journeys->get(
@@ -154,8 +156,9 @@ sub list_candidates {
 	$self->respond_to(
 		json => { json => [@journeys] },
 		any  => {
-			template => 'passengerrights',
-			journeys => [@journeys]
+			template     => 'passengerrights',
+			journeys     => [@journeys],
+			abo_journeys => [@abo_journeys]
 		}
 	);
 }