diff options
Diffstat (limited to 'lib/Travel/Status/DE/HAFAS.pm')
| -rw-r--r-- | lib/Travel/Status/DE/HAFAS.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lib/Travel/Status/DE/HAFAS.pm b/lib/Travel/Status/DE/HAFAS.pm index 379bd82..638b4af 100644 --- a/lib/Travel/Status/DE/HAFAS.pm +++ b/lib/Travel/Status/DE/HAFAS.pm @@ -42,6 +42,9 @@ sub new { if ( not $ua ) { my %lwp_options = %{ $conf{lwp_options} // { timeout => 10 } }; + if ( $service and $hafas_instance->{$service}{ua_string} ) { + $lwp_options{agent} = $hafas_instance->{$service}{ua_string}; + } $ua = LWP::UserAgent->new(%lwp_options); $ua->env_proxy; } @@ -137,7 +140,7 @@ sub new { y => int( $conf{geoSearch}{lat} * 1e6 ), }, maxDist => -1, - minDist => 0, + minDist => 0, }, locFltrL => [ { |