diff options
| author | Derf Null <derf@finalrewind.org> | 2023-04-17 22:52:23 +0200 |
|---|---|---|
| committer | Derf Null <derf@finalrewind.org> | 2023-04-17 22:52:23 +0200 |
| commit | 5251adaa9d57b14032521495bb02871d9a532cb8 (patch) | |
| tree | 430efc14373c99f5f2321a50b3b3efd477c097ff /lib/Travel | |
| parent | 350af0a511aecb8c90f7bcbeaa191659a9c47cc4 (diff) | |
new_p: support geoSearch and locationSearch
Diffstat (limited to 'lib/Travel')
| -rw-r--r-- | lib/Travel/Status/DE/HAFAS.pm | 8 |
1 files changed, 7 insertions, 1 deletions
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'); } |