From 5251adaa9d57b14032521495bb02871d9a532cb8 Mon Sep 17 00:00:00 2001 From: Derf Null Date: Mon, 17 Apr 2023 22:52:23 +0200 Subject: new_p: support geoSearch and locationSearch --- lib/Travel/Status/DE/HAFAS.pm | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) (limited to 'lib') diff --git a/lib/Travel/Status/DE/HAFAS.pm b/lib/Travel/Status/DE/HAFAS.pm index 8da83eb..aea551c 100644 --- a/lib/Travel/Status/DE/HAFAS.pm +++ b/lib/Travel/Status/DE/HAFAS.pm @@ -414,7 +414,13 @@ sub new_p { my ( $obj, %conf ) = @_; my $promise = $conf{promise}->new; - if ( not $conf{station} and not $conf{journey} ) { + if ( + not( $conf{station} + or $conf{journey} + or $conf{geoSearch} + or $conf{locationSearch} ) + ) + { return $promise->reject('station or journey flag must be passed'); } -- cgit v1.2.3