Unverified Commit 5251adaa authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

new_p: support geoSearch and locationSearch

parent 350af0a5

lib/Travel/Status/DE/HAFAS.pm

+7 −1
Original line number Diff line number Diff line
@@ -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');

	}