Commit 49197e9b authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

line no calculation: Don't get confused by 3- or 4-digit train numbers

parent 05978962

lib/Travel/Status/DE/IRIS/Result.pm

+2 −2
Original line number Diff line number Diff line
@@ -202,8 +202,8 @@ sub new { 


	$ref->{is_cancelled} = 0;



	if ( not defined $ref->{line_no} ) {

		my $train_prefix = substr( $ref->{train_no}, 0, 3 );

	if ( not defined $ref->{line_no} and length( $ref->{train_no} ) > 2 ) {

		my $train_prefix = substr( $ref->{train_no}, -5, 3 );

		$ref->{line_no} = $linemap{ $ref->{type} }{$train_prefix};

	}