From 8e2ecca250a9b3115f2fc13fdbcd23775e82ad51 Mon Sep 17 00:00:00 2001 From: Birte Kristina Friesel Date: Thu, 23 Oct 2025 16:09:50 +0200 Subject: DBDB: make proxy config accessible --- lib/Travelynx/Helper/DBDB.pm | 10 ++++------ 1 file changed, 4 insertions(+), 6 deletions(-) (limited to 'lib/Travelynx/Helper/DBDB.pm') 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; } -- cgit v1.2.3