Commit e01bd2bf authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

further simplify wagon image naming scheme

parent def0707b

lib/DBInfoscreen.pm

+2 −5
Original line number Diff line number Diff line
@@ -188,11 +188,8 @@ sub startup { 
			elsif ( not $uic ) {

				return;

			}

			elsif ( $train_type =~ m{ICE 4} ) {

				$ret = substr( $uic, 4, 5 );

			}

			else {

				$ret = substr( $uic, 5, 4 );

				$ret = substr( $uic, 4, 5 );

			}



			if ( $train_type =~ m{ICE . 4..[.]1} ) {
@@ -201,7 +198,7 @@ sub startup { 
			elsif ( $train_type =~ m{ICE . 4..[.]2} ) {

				$ret .= '.2';

			}

			elsif ( $train_type =~ m{ICE 3 Redesign} ) {

			elsif ( $train_type =~ m{Redesign} ) {

				$ret .= '.r';

			}

share/dbdb_wagen.json

+1 −1

File changed.

Preview size limit exceeded, changes collapsed.