Unverified Commit 8e673786 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

IRIS/HAFAS: … and another edge case

parent b3015265

lib/Travelynx/Helper/HAFAS.pm

+1 −1
Original line number Diff line number Diff line
@@ -120,7 +120,7 @@ sub get_tripid_p { 
		$train_desc = 'EC ' . $train->train_no;

	}

	elsif ( $train->type

		=~ m{ ^ (?: ABR | ag | ALX | EB | MRB | NBE | STB | TLX | OE ) $ }x )

		=~ m{ ^ (?: ABR | ag | ALX | EB | MRB | NBE | STB | TLX | OE | VIA ) $ }x )

	{

		$train_desc = $train->train_no;

	}