diff options
| -rw-r--r-- | README.md | 1 | ||||
| -rw-r--r-- | lib/DBInfoscreen.pm | 3 | ||||
| -rw-r--r-- | lib/DBInfoscreen/Helper/HAFAS.pm | 4 |
3 files changed, 6 insertions, 2 deletions
@@ -89,6 +89,7 @@ db-infoscreen respects the following environment variables: | :------- | :------ | :---------- | | DBFAKEDISPLAY\_LISTEN | `http://*:8092` | IP and Port for web service | | DBFAKEDISPLAY\_STATS | _None_ | File in which the total count of backend API requests (excluding those answered from cache) is written | +| DBFAKEDISPLAY\_HAFAS\_API | `https://v5.db.transport.rest` | hafas-rest-api endpoint | | DBFAKEDISPLAY\_HAFAS\_CACHE | `/tmp/dbf-hafas` | Directory for HAFAS cache | | DBFAKEDISPLAY\_IRIS\_CACHE | `/tmp/dbf-iris-mian` | Directory for IRIS schedule cache | | DBFAKEDISPLAY\_IRISRT\_CACHE | `/tmp/dbf-iris-realtime` | Directory for IRIS realtime cache | diff --git a/lib/DBInfoscreen.pm b/lib/DBInfoscreen.pm index 7a0bea4..b9b850d 100644 --- a/lib/DBInfoscreen.pm +++ b/lib/DBInfoscreen.pm @@ -30,6 +30,8 @@ sub startup { my ($self) = @_; $self->config( + hafas_rest_api => $ENV{DBFAKEDISPLAY_HAFAS_API} + // 'https://v5.db.transport.rest', hypnotoad => { accepts => $ENV{DBFAKEDISPLAY_ACCEPTS} // 100, clients => $ENV{DBFAKEDISPLAY_CLIENTS} // 10, @@ -142,6 +144,7 @@ sub startup { hafas => sub { my ($self) = @_; state $hafas = DBInfoscreen::Helper::HAFAS->new( + api => $self->config->{hafas_rest_api}, log => $self->app->log, main_cache => $self->app->cache_iris_main, realtime_cache => $self->app->cache_iris_rt, diff --git a/lib/DBInfoscreen/Helper/HAFAS.pm b/lib/DBInfoscreen/Helper/HAFAS.pm index 8c11412..a421c38 100644 --- a/lib/DBInfoscreen/Helper/HAFAS.pm +++ b/lib/DBInfoscreen/Helper/HAFAS.pm @@ -379,8 +379,8 @@ sub get_route_timestamps_p { sub get_polyline_p { my ( $self, $trip_id, $line ) = @_; - my $url - = "https://v5.db.transport.rest/trips/${trip_id}?lineName=${line}&polyline=true"; + my $api = $self->{api}; + my $url = "${api}/trips/${trip_id}?lineName=${line}&polyline=true"; my $cache = $self->{realtime_cache}; my $promise = Mojo::Promise->new; |