summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lib/Travel/Status/DE/DBWagenreihung.pm12
1 files changed, 11 insertions, 1 deletions
diff --git a/lib/Travel/Status/DE/DBWagenreihung.pm b/lib/Travel/Status/DE/DBWagenreihung.pm
index 58c2477..3ede0ae 100644
--- a/lib/Travel/Status/DE/DBWagenreihung.pm
+++ b/lib/Travel/Status/DE/DBWagenreihung.pm
@@ -58,13 +58,15 @@ my %model_name = (
'422' => ['BR 422'],
'423' => ['BR 423'],
'425' => ['BR 425'],
- '429' => [ 'FLIRT', 'BR 429' ],
+ '429' => [ 'FLIRT', 'BR 429' ],
+ '430' => ['BR 430'],
'440' => [ 'Continental', 'BR 440' ],
'442' => [ 'Talent 2', 'BR 442' ],
'445' => [ 'Twindexx Vario', 'BR 445' ],
'446' => [ 'Twindexx Vario', 'BR 446' ],
'463' => [ 'Mireo', 'BR 463' ],
'475' => [ 'TGV', 'BR 475' ],
+ '612' => [ 'RegioSwinger', 'BR 612' ],
'620' => [ 'LINT 81', 'BR 620' ],
'622' => [ 'LINT 54', 'BR 622' ],
'640' => [ 'LINT 27', 'BR 640' ],
@@ -467,12 +469,14 @@ sub wagongroup_subtype {
'423' => 0,
'425' => 0,
'429' => 0,
+ '430' => 0,
'440' => 0,
'442' => 0,
'445' => 0,
'446' => 0,
'463' => 0,
'475' => 0,
+ '612' => 0,
'620' => 0,
'622' => 0,
'640' => 0,
@@ -541,6 +545,9 @@ sub wagongroup_subtype {
elsif ( $wagon->model == 429 or $wagon->model == 829 ) {
$ml{'429'}++;
}
+ elsif ( $wagon->model == 430 or $wagon->model == 431 ) {
+ $ml{'430'}++;
+ }
elsif ($wagon->model == 440
or $wagon->model == 441
or $wagon->model == 841 )
@@ -566,6 +573,9 @@ sub wagongroup_subtype {
elsif ( $wagon->model == 475 ) {
$ml{'475'}++;
}
+ elsif ( $wagon->model == 612 ) {
+ $ml{'612'}++;
+ }
elsif ( $wagon->model == 620 or $wagon->model == 621 ) {
$ml{'620'}++;
}