From ffc2a2b3e28ccbf646c6224e3b958a5017d63888 Mon Sep 17 00:00:00 2001 From: Birte Kristina Friesel Date: Sun, 3 Mar 2024 11:18:52 +0100 Subject: Add BR 422 and Stadler FLIRT (BR 429) --- lib/Travel/Status/DE/DBWagenreihung.pm | 10 ++++++++++ 1 file changed, 10 insertions(+) diff --git a/lib/Travel/Status/DE/DBWagenreihung.pm b/lib/Travel/Status/DE/DBWagenreihung.pm index 2f238f1..02e80d0 100644 --- a/lib/Travel/Status/DE/DBWagenreihung.pm +++ b/lib/Travel/Status/DE/DBWagenreihung.pm @@ -55,6 +55,8 @@ my %model_name = ( '411.S2' => [ 'ICE T', 'BR 411, 2. Serie' ], '412' => ['ICE 4'], '415' => [ 'ICE T', 'BR 415' ], + '422' => ['BR 422'], + '429' => [ 'FLIRT', 'BR 429' ], '475' => [ 'TGV', 'BR 475' ], 'IC2.TWIN' => ['IC 2 Twindexx'], 'IC2.KISS' => ['IC 2 KISS'], @@ -438,6 +440,8 @@ sub wagongroup_subtype { '411.S2' => 0, '412' => 0, '415' => 0, + '422' => 0, + '429' => 0, '475' => 0, 'IC2.TWIN' => 0, 'IC2.KISS' => 0, @@ -491,6 +495,12 @@ sub wagongroup_subtype { elsif ( $wagon->model == 415 ) { $ml{'415'}++; } + elsif ( $wagon->model == 422 or $wagon->model == 432 ) { + $ml{'422'}++; + } + elsif ( $wagon->model == 429 or $wagon->model == 829 ) { + $ml{'429'}++; + } elsif ( $wagon->model == 475 ) { $ml{'475'}++; } -- cgit v1.2.3