summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBirte Kristina Friesel <birte.friesel@uos.de>2024-03-06 18:02:41 +0100
committerBirte Kristina Friesel <birte.friesel@uos.de>2024-03-06 18:02:41 +0100
commit74bec419b8b09cc6bf9b79a27525283f794bed63 (patch)
treebf7fdc6c4a084ab58fb116b620ecfdd3769e5c42
parent0a4bde31d6c19d9eccd6de13d969419aa113f064 (diff)
Add Siemens Desiro Classic
-rw-r--r--lib/Travel/Status/DE/DBWagenreihung.pm5
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'}++;
}