From 4c6612a0656abcc930a82f2d4ea310e16186156c Mon Sep 17 00:00:00 2001 From: Birte Kristina Friesel Date: Sat, 27 Apr 2024 14:05:06 +0200 Subject: set wagon->group_index even if train type is unknown --- lib/Travel/Status/DE/DBWagenreihung/Wagon.pm | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) (limited to 'lib/Travel/Status/DE/DBWagenreihung/Wagon.pm') diff --git a/lib/Travel/Status/DE/DBWagenreihung/Wagon.pm b/lib/Travel/Status/DE/DBWagenreihung/Wagon.pm index 27f2e36..646028f 100644 --- a/lib/Travel/Status/DE/DBWagenreihung/Wagon.pm +++ b/lib/Travel/Status/DE/DBWagenreihung/Wagon.pm @@ -203,7 +203,12 @@ sub parse_type { sub set_traintype { my ( $self, $group_index, $tt ) = @_; - $self->{group_index} = $group_index; + $self->{group_index} = $group_index; + + if ( not $tt ) { + return; + } + $self->{train_subtype} = $tt; if ( not $self->{number} or not exists( $type_attributes{$tt} ) ) { -- cgit v1.2.3