diff options
Diffstat (limited to 'lib')
| -rwxr-xr-x | lib/Travelynx.pm | 1 | ||||
| -rw-r--r-- | lib/Travelynx/Helper/DBDB.pm | 10 |
2 files changed, 5 insertions, 6 deletions
diff --git a/lib/Travelynx.pm b/lib/Travelynx.pm index 5d440dc..6addb5d 100755 --- a/lib/Travelynx.pm +++ b/lib/Travelynx.pm @@ -413,6 +413,7 @@ sub startup { my ($self) = @_; state $dbdb = Travelynx::Helper::DBDB->new( log => $self->app->log, + dbris_config => $self->app->config->{dbris}, main_cache => $self->app->cache_iris_main, realtime_cache => $self->app->cache_iris_rt, root_url => $self->base_url_for('/')->to_abs, diff --git a/lib/Travelynx/Helper/DBDB.pm b/lib/Travelynx/Helper/DBDB.pm index 13f1f50..09d612e 100644 --- a/lib/Travelynx/Helper/DBDB.pm +++ b/lib/Travelynx/Helper/DBDB.pm @@ -63,11 +63,10 @@ sub has_wagonorder_p { my $agent = $self->{user_agent}; my $proxy; - if ( my @proxies = @{ $self->{service_config}{'bahn.de'}{proxies} // [] } ) - { + if ( my @proxies = @{ $self->{dbris_config}{'bahn.de'}{proxies} // [] } ) { $proxy = $proxies[ int( rand( scalar @proxies ) ) ]; } - elsif ( my $p = $self->{service_config}{'bahn.de'}{proxy} ) { + elsif ( my $p = $self->{dbris_config}{'bahn.de'}{proxy} ) { $proxy = $p; } @@ -137,11 +136,10 @@ sub get_wagonorder_p { my $agent = $self->{user_agent}; my $proxy; - if ( my @proxies = @{ $self->{service_config}{'bahn.de'}{proxies} // [] } ) - { + if ( my @proxies = @{ $self->{dbris_config}{'bahn.de'}{proxies} // [] } ) { $proxy = $proxies[ int( rand( scalar @proxies ) ) ]; } - elsif ( my $p = $self->{service_config}{'bahn.de'}{proxy} ) { + elsif ( my $p = $self->{dbris_config}{'bahn.de'}{proxy} ) { $proxy = $p; } |