Unverified Commit 5a951e55 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

and another edge case

Closes #350
parent f67d8f4d
Loading
Loading
Loading
Loading
+2 −1
Original line number Diff line number Diff line
@@ -120,7 +120,8 @@ sub get_tripid_p {
		$train_desc = 'EC ' . $train->train_no;
	}
	elsif ( $train->type
		=~ m{ ^ (?: ABR | ag | ALX | EB | MRB | NBE | STB | TLX | OE | VIA ) $ }x )
		=~ m{ ^ (?: ABR | ag | ALX | EB | ERB | MRB | NBE | STB | TLX | OE | VIA ) $ }x
	  )
	{
		$train_desc = $train->train_no;
	}