From c26c8820f296de41ce7093416b584cfdb6b657fa Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Wed, 9 Nov 2022 18:14:07 +0100 Subject: Switch to internal HAFAS client for connection details --- lib/Travelynx/Helper/HAFAS.pm | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) (limited to 'lib/Travelynx/Helper') diff --git a/lib/Travelynx/Helper/HAFAS.pm b/lib/Travelynx/Helper/HAFAS.pm index 7b42384..a8fbbfb 100644 --- a/lib/Travelynx/Helper/HAFAS.pm +++ b/lib/Travelynx/Helper/HAFAS.pm @@ -83,6 +83,22 @@ sub get_json_p { return $promise; } +sub get_departures_p { + my ( $self, %opt ) = @_; + + my $when = DateTime->now( time_zone => 'Europe/Berlin' ) + ->subtract( minutes => $opt{lookbehind} ); + return Travel::Status::DE::HAFAS->new_p( + station => $opt{eva}, + datetime => $when, + duration => $opt{lookahead}, + results => 120, + cache => $self->{realtime_cache}, + promise => 'Mojo::Promise', + user_agent => $self->{user_agent}->request_timeout(5), + ); +} + sub get_route_timestamps_p { my ( $self, %opt ) = @_; -- cgit v1.2.3