diff options
author | Birte Kristina Friesel <derf@finalrewind.org> | 2024-04-28 14:53:53 +0200 |
---|---|---|
committer | Birte Kristina Friesel <derf@finalrewind.org> | 2024-04-28 14:53:53 +0200 |
commit | 2e2db4c7244ab15ba2cff447cf0c4a77f4790d97 (patch) | |
tree | 357a7b8782cef2883263f3f2b556f9e564ea9323 | |
parent | 81bcb5b506c8956193bd5d174aec7f49e6735d2d (diff) |
Add BR420
-rw-r--r-- | lib/Travel/Status/DE/DBWagenreihung.pm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lib/Travel/Status/DE/DBWagenreihung.pm b/lib/Travel/Status/DE/DBWagenreihung.pm index fcda3ba..8d3fd0c 100644 --- a/lib/Travel/Status/DE/DBWagenreihung.pm +++ b/lib/Travel/Status/DE/DBWagenreihung.pm @@ -65,6 +65,7 @@ my %model_name = ( '411.S2' => [ 'ICE T', 'BR 411, 2. Serie' ], '412' => ['ICE 4'], '415' => [ 'ICE T', 'BR 415' ], + '420' => ['BR 420'], '422' => ['BR 422'], '423' => ['BR 423'], '425' => ['BR 425'], @@ -521,6 +522,7 @@ sub wagongroup_subtype { '411.S2' => 0, '412' => 0, '415' => 0, + '420' => 0, '422' => 0, '423' => 0, '425' => 0, @@ -597,6 +599,9 @@ sub wagongroup_subtype { elsif ( $wagon->model == 415 ) { $ml{'415'}++; } + elsif ( $wagon->model == 420 or $wagon->model == 421 ) { + $ml{'420'}++; + } elsif ( $wagon->model == 422 or $wagon->model == 432 ) { $ml{'422'}++; } |