diff options
Diffstat (limited to 'lib/Travel/Status')
| -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 1554a65..1accece 100644 --- a/lib/Travel/Status/DE/DBWagenreihung.pm +++ b/lib/Travel/Status/DE/DBWagenreihung.pm @@ -78,6 +78,7 @@ my %model_name = ( '632' => [ 'Link II', 'BR 632' ], '633' => [ 'Link III', 'BR 633' ], '640' => [ 'LINT 27', 'BR 640' ], + '642' => [ 'Desiro Classic', 'BR 642' ], '643' => [ 'TALENT', 'BR 643' ], '648' => [ 'LINT 41', 'BR 648' ], 'IC2.TWIN' => ['IC 2 Twindexx'], @@ -496,6 +497,7 @@ sub wagongroup_subtype { '632' => 0, '633' => 0, '640' => 0, + '642' => 0, '643' => 0, '648' => 0, 'IC2.TWIN' => 0, @@ -622,6 +624,9 @@ sub wagongroup_subtype { elsif ( $wagon->model == 640 ) { $ml{'640'}++; } + elsif ( $wagon->model == 642 ) { + $ml{'642'}++; + } elsif ( $wagon->model == 643 or $wagon->model == 943 ) { $ml{'643'}++; } |