save wagongroups if available

This commit is contained in:
Daniel Friesel 2019-12-13 17:28:52 +01:00
parent b211e0842a
commit f6bff01f76

View file

@ -2178,6 +2178,15 @@ sub startup {
}
);
}
if ( $group->{fahrzeuggruppebezeichnung}
and $group->{fahrzeuggruppebezeichnung}
=~ m{ ^ ICE }x )
{
push(
@{ $user_data->{wagongroups} },
$group->{fahrzeuggruppebezeichnung}
);
}
}
$db->update(
'in_transit',