summaryrefslogtreecommitdiff
path: root/lib/Travel/Status/DE/HAFAS/Services.pm.PL
diff options
context:
space:
mode:
authorBirte Kristina Friesel <derf@finalrewind.org>2025-02-09 13:56:33 +0100
committerBirte Kristina Friesel <derf@finalrewind.org>2025-02-09 13:56:33 +0100
commite403f10952ae923d9b7acd4ea8694c7854c5601b (patch)
tree736c5846ef778a59ea155cbb8c92dd6d8f81d463 /lib/Travel/Status/DE/HAFAS/Services.pm.PL
parent520e11a25e0c970cc0382af4bfb3565a9ced96fa (diff)
Add support for service-specific proxies
Diffstat (limited to 'lib/Travel/Status/DE/HAFAS/Services.pm.PL')
-rw-r--r--lib/Travel/Status/DE/HAFAS/Services.pm.PL11
1 files changed, 9 insertions, 2 deletions
diff --git a/lib/Travel/Status/DE/HAFAS/Services.pm.PL b/lib/Travel/Status/DE/HAFAS/Services.pm.PL
index f0e1d18..2adaf71 100644
--- a/lib/Travel/Status/DE/HAFAS/Services.pm.PL
+++ b/lib/Travel/Status/DE/HAFAS/Services.pm.PL
@@ -72,6 +72,10 @@ sub load_instance {
$ret{request}{ver} = $data->{options}{version};
}
+ if ( $opt{geoip_lock} ) {
+ $ret{geoip_lock} = $opt{geoip_lock};
+ }
+
if ( $opt{lang} ) {
$ret{request}{lang} = $opt{lang};
}
@@ -182,8 +186,11 @@ my %hafas_instance = (
),
stopfinder => 'https://fahrplan.oebb.at/bin/ajax-getstop.exe',
},
- PKP =>
- { load_instance( 'pl/pkp', lang => 'pol' ), ua_string => 'Dalvik/2.1.0' },
+ PKP => {
+ load_instance( 'pl/pkp', lang => 'pol' ),
+ ua_string => 'Dalvik/2.1.0',
+ geoip_lock => 'PKP'
+ },
Resrobot => { load_instance( 'se/resrobot', lang => 'sve' ), },
RMV => { load_instance( 'de/rmv', lang => 'deu' ), },
RSAG => { load_instance( 'de/rsag', lang => 'deu' ), },