From bb9a1bf609ba6e5bad00d99077212a702c15bdd6 Mon Sep 17 00:00:00 2001 From: Birte Kristina Friesel Date: Tue, 4 Mar 2025 19:58:05 +0100 Subject: Remove VRN; switch default backend to ÖBB MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- lib/DBInfoscreen/Helper/HAFAS.pm | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) (limited to 'lib/DBInfoscreen/Helper/HAFAS.pm') diff --git a/lib/DBInfoscreen/Helper/HAFAS.pm b/lib/DBInfoscreen/Helper/HAFAS.pm index 6c38973..e16bad8 100644 --- a/lib/DBInfoscreen/Helper/HAFAS.pm +++ b/lib/DBInfoscreen/Helper/HAFAS.pm @@ -7,6 +7,7 @@ package DBInfoscreen::Helper::HAFAS; use strict; use warnings; use 5.020; +use utf8; use DateTime; use Encode qw(decode encode); @@ -58,7 +59,7 @@ sub get_route_p { if ( $opt{trip_id} ) { $hafas_promise = Travel::Status::DE::HAFAS->new_p( - service => $opt{service} // 'VRN', + service => $opt{service} // 'ÖBB', journey => { id => $opt{trip_id}, }, @@ -77,7 +78,7 @@ sub get_route_p { } $hafas_promise //= Travel::Status::DE::HAFAS->new_p( - service => $opt{service} // 'VRN', + service => $opt{service} // 'ÖBB', journeyMatch => $opt{train_req} =~ s{^- }{}r, datetime => ( $opt{train} ? $opt{train}->start : $opt{datetime} ), language => $opt{language}, @@ -108,7 +109,7 @@ sub get_route_p { } return Travel::Status::DE::HAFAS->new_p( - service => $opt{service} // 'VRN', + service => $opt{service} // 'ÖBB', journey => { id => $result->id, }, @@ -274,7 +275,7 @@ sub get_polyline_p { my $trip_id = $opt{id}; my $line = $opt{line}; - my $service = $opt{service} // 'VRN'; + my $service = $opt{service} // 'ÖBB'; my $promise = Mojo::Promise->new; my $agent = $self->{user_agent}; -- cgit v1.2.3