diff options
author | Daniel Friesel <derf@finalrewind.org> | 2021-01-09 15:30:17 +0100 |
---|---|---|
committer | Daniel Friesel <derf@finalrewind.org> | 2021-01-09 15:30:17 +0100 |
commit | e01bd2bf7ddaaa90370a1200dc24006a6babfc50 (patch) | |
tree | b201d7b1f29ae9da2b1803f027f0250b6374bc3c /lib/DBInfoscreen.pm | |
parent | def0707b6d190934dc706320448e50c8e9f18711 (diff) |
further simplify wagon image naming scheme
Diffstat (limited to 'lib/DBInfoscreen.pm')
-rw-r--r-- | lib/DBInfoscreen.pm | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/lib/DBInfoscreen.pm b/lib/DBInfoscreen.pm index 50601dd..a8086e9 100644 --- a/lib/DBInfoscreen.pm +++ b/lib/DBInfoscreen.pm @@ -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'; } |