summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBirte Kristina Friesel <derf@finalrewind.org>2024-03-03 11:24:52 +0100
committerBirte Kristina Friesel <derf@finalrewind.org>2024-03-03 11:24:52 +0100
commitdab5eb7f26d7fc45b16249a95996c27e9ced9f04 (patch)
tree75d0b52e425e265f1388d65baed3516959ad8b9b
parentffc2a2b3e28ccbf646c6224e3b958a5017d63888 (diff)
Add Stadler FLIRT
-rw-r--r--lib/Travel/Status/DE/DBWagenreihung.pm12
1 files changed, 10 insertions, 2 deletions
diff --git a/lib/Travel/Status/DE/DBWagenreihung.pm b/lib/Travel/Status/DE/DBWagenreihung.pm
index 02e80d0..c5c2a21 100644
--- a/lib/Travel/Status/DE/DBWagenreihung.pm
+++ b/lib/Travel/Status/DE/DBWagenreihung.pm
@@ -56,8 +56,9 @@ my %model_name = (
'412' => ['ICE 4'],
'415' => [ 'ICE T', 'BR 415' ],
'422' => ['BR 422'],
- '429' => [ 'FLIRT', 'BR 429' ],
- '475' => [ 'TGV', 'BR 475' ],
+ '429' => [ 'FLIRT', 'BR 429' ],
+ '440' => [ 'Coradia Continental', 'BR 440' ],
+ '475' => [ 'TGV', 'BR 475' ],
'IC2.TWIN' => ['IC 2 Twindexx'],
'IC2.KISS' => ['IC 2 KISS'],
);
@@ -442,6 +443,7 @@ sub wagongroup_subtype {
'415' => 0,
'422' => 0,
'429' => 0,
+ '440' => 0,
'475' => 0,
'IC2.TWIN' => 0,
'IC2.KISS' => 0,
@@ -501,6 +503,12 @@ sub wagongroup_subtype {
elsif ( $wagon->model == 429 or $wagon->model == 829 ) {
$ml{'429'}++;
}
+ elsif ($wagon->model == 440
+ or $wagon->model == 441
+ or $wagon->model == 841 )
+ {
+ $ml{'440'}++;
+ }
elsif ( $wagon->model == 475 ) {
$ml{'475'}++;
}