Unverified Commit 55b95aaf authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

new_p: handle unknown EVA IDs

parent fdeb15c6

lib/Travel/Status/DE/IRIS.pm

+9 −0
Original line number Diff line number Diff line
@@ -54,6 +54,15 @@ sub new_p { 


	my @candidates = $opt{get_station}( $opt{station} );



	if ( @candidates != 1 and $opt{station} =~ m{^\d+$} ) {

		@candidates = (

			[

				"D$opt{station}", "Betriebsstelle nicht bekannt $opt{station}",

				$opt{station}

			]

		);

	}



	if ( @candidates == 0 ) {

		return $promise->reject('station not found');

	}