diff options
| author | Birte Kristina Friesel <derf@finalrewind.org> | 2024-03-27 14:59:20 +0100 |
|---|---|---|
| committer | Birte Kristina Friesel <derf@finalrewind.org> | 2024-03-27 14:59:20 +0100 |
| commit | 51b52327caa311a851c50951a5c4b9b37ccf0ed8 (patch) | |
| tree | fc7f188e9a7b5c8c0cf3c80d71478205306708ef /lib/DBInfoscreen/Helper/HAFAS.pm | |
| parent | 4329fde714614c28e12f45892c486c0989c85886 (diff) | |
map: support non-DB HAFAS backends, including ÖBB
Diffstat (limited to 'lib/DBInfoscreen/Helper/HAFAS.pm')
| -rw-r--r-- | lib/DBInfoscreen/Helper/HAFAS.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lib/DBInfoscreen/Helper/HAFAS.pm b/lib/DBInfoscreen/Helper/HAFAS.pm index 302cb9c..148a917 100644 --- a/lib/DBInfoscreen/Helper/HAFAS.pm +++ b/lib/DBInfoscreen/Helper/HAFAS.pm @@ -161,11 +161,15 @@ sub get_route_p { # Input: (HAFAS TripID, line number) # Output: Promise returning a Travel::Status::DE::HAFAS::Journey instance on success sub get_polyline_p { - my ( $self, $trip_id, $line ) = @_; + my ( $self, %opt ) = @_; + my $trip_id = $opt{id}; + my $line = $opt{line}; + my $service = $opt{service}; my $promise = Mojo::Promise->new; Travel::Status::DE::HAFAS->new_p( + service => $service, journey => { id => $trip_id, name => $line, |