diff options
author | Birte Kristina Friesel <derf@finalrewind.org> | 2023-09-16 15:03:50 +0200 |
---|---|---|
committer | Birte Kristina Friesel <derf@finalrewind.org> | 2023-09-16 15:03:50 +0200 |
commit | 4b8856ff35c40600b4f8ae7b276b8c399c6d16ed (patch) | |
tree | e72830d604c78b60892c25a8ba65315309c02012 /lib/Travel/Status | |
parent | 9b75f467680efabc935654514215d91dd6731bdc (diff) |
journey: check if nameS exists before concatenating it
Diffstat (limited to 'lib/Travel/Status')
-rw-r--r-- | lib/Travel/Status/DE/HAFAS/Journey.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Travel/Status/DE/HAFAS/Journey.pm b/lib/Travel/Status/DE/HAFAS/Journey.pm index fcb33d4..6b9af6d 100644 --- a/lib/Travel/Status/DE/HAFAS/Journey.pm +++ b/lib/Travel/Status/DE/HAFAS/Journey.pm @@ -53,7 +53,7 @@ sub new { my $train_no = $product->{prodCtx}{num}; my $cat = $product->{prodCtx}{catOut}; my $catlong = $product->{prodCtx}{catOutL}; - if ( $name and $cat and $name eq $cat ) { + if ( $name and $cat and $name eq $cat and $product->{nameS} ) { $name .= ' ' . $product->{nameS}; } if ( defined $train_no and not $train_no ) { |