diff options
| author | Daniel Friesel <derf@finalrewind.org> | 2020-09-06 11:20:32 +0200 |
|---|---|---|
| committer | Daniel Friesel <derf@finalrewind.org> | 2020-09-06 11:20:32 +0200 |
| commit | 7151176d5d2a05ed6c8c30ea8944e518099c1173 (patch) | |
| tree | 73463100034f9bad617bf4afe82ff23a49619f4b | |
| parent | b2824fcfb9ef1fcd9b09d74c472aa783d6fe0db5 (diff) | |
include instance URL in UA3.1.4
| -rw-r--r-- | lib/DBInfoscreen.pm | 2 | ||||
| -rw-r--r-- | lib/DBInfoscreen/Helper/HAFAS.pm | 3 | ||||
| -rw-r--r-- | lib/DBInfoscreen/Helper/Wagonorder.pm | 3 |
3 files changed, 6 insertions, 2 deletions
diff --git a/lib/DBInfoscreen.pm b/lib/DBInfoscreen.pm index b31a1a7..72be819 100644 --- a/lib/DBInfoscreen.pm +++ b/lib/DBInfoscreen.pm @@ -105,6 +105,7 @@ sub startup { log => $self->app->log, main_cache => $self->app->cache_iris_main, realtime_cache => $self->app->cache_iris_rt, + root_url => $self->url_for('/')->to_abs, user_agent => $self->ua, version => $VERSION, ); @@ -117,6 +118,7 @@ sub startup { state $hafas = DBInfoscreen::Helper::Wagonorder->new( log => $self->app->log, cache => $self->app->cache_iris_main, + root_url => $self->url_for('/')->to_abs, user_agent => $self->ua, version => $VERSION, ); diff --git a/lib/DBInfoscreen/Helper/HAFAS.pm b/lib/DBInfoscreen/Helper/HAFAS.pm index c9a2ba2..ba6295f 100644 --- a/lib/DBInfoscreen/Helper/HAFAS.pm +++ b/lib/DBInfoscreen/Helper/HAFAS.pm @@ -16,7 +16,8 @@ sub new { $opt{header} = { 'User-Agent' => - "dbf/${version} +https://finalrewind.org/projects/db-fakedisplay" }; +"dbf/${version} on $opt{root_url} +https://finalrewind.org/projects/db-fakedisplay" + }; return bless( \%opt, $class ); diff --git a/lib/DBInfoscreen/Helper/Wagonorder.pm b/lib/DBInfoscreen/Helper/Wagonorder.pm index 98c22ca..91006fc 100644 --- a/lib/DBInfoscreen/Helper/Wagonorder.pm +++ b/lib/DBInfoscreen/Helper/Wagonorder.pm @@ -16,7 +16,8 @@ sub new { $opt{header} = { 'User-Agent' => - "dbf/${version} +https://finalrewind.org/projects/db-fakedisplay" }; +"dbf/${version} on $opt{root_url} +https://finalrewind.org/projects/db-fakedisplay" + }; return bless( \%opt, $class ); |