/s: support filter by trip_id; only allow train filter in IRIS mode

This commit is contained in:
Birte Kristina Friesel 2023-09-17 15:50:11 +02:00
parent a5804691f6
commit 8810acf742
No known key found for this signature in database
GPG key ID: 19E6E524EBB177BA

View file

@ -905,6 +905,7 @@ sub station {
my ($self) = @_; my ($self) = @_;
my $station = $self->stash('station'); my $station = $self->stash('station');
my $train = $self->param('train'); my $train = $self->param('train');
my $trip_id = $self->param('trip_id');
my $uid = $self->current_user->{id}; my $uid = $self->current_user->{id};
my @timeline = $self->in_transit->get_timeline( my @timeline = $self->in_transit->get_timeline(
@ -1000,7 +1001,10 @@ sub station {
} }
my $connections_p; my $connections_p;
if ($train) { if ( $trip_id and $use_hafas ) {
@results = grep { $_->id eq $trip_id } @results;
}
elsif ( $train and not $use_hafas ) {
@results @results
= grep { $_->type . ' ' . $_->train_no eq $train } @results; = grep { $_->type . ' ' . $_->train_no eq $train } @results;
} }