summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBirte Kristina Friesel <derf@finalrewind.org>2023-09-16 15:03:50 +0200
committerBirte Kristina Friesel <derf@finalrewind.org>2023-09-16 15:03:50 +0200
commit4b8856ff35c40600b4f8ae7b276b8c399c6d16ed (patch)
treee72830d604c78b60892c25a8ba65315309c02012
parent9b75f467680efabc935654514215d91dd6731bdc (diff)
journey: check if nameS exists before concatenating it
-rw-r--r--lib/Travel/Status/DE/HAFAS/Journey.pm2
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 ) {