Switch to internal HAFAS client for connection details

1 files changed, 16 insertions, 0 deletions

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 ) = @_;