From 1608d648420def2bdcf54f46c00fa2ebd9ba8bf9 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Sun, 20 Sep 2015 13:04:20 +0200 Subject: result->info: return undef if no info is available --- lib/Travel/Status/DE/HAFAS.pm | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) (limited to 'lib/Travel/Status/DE/HAFAS.pm') diff --git a/lib/Travel/Status/DE/HAFAS.pm b/lib/Travel/Status/DE/HAFAS.pm index ab12cc2..28d069b 100644 --- a/lib/Travel/Status/DE/HAFAS.pm +++ b/lib/Travel/Status/DE/HAFAS.pm @@ -305,11 +305,9 @@ sub results { substr( $date, 6, 0, '20' ); - $info //= q{}; - # delayReason=" " means no delay reason if ( $info eq q{ } ) { - $info = q{}; + $info = undef; } $train =~ s{#.*$}{}; -- cgit v1.2.3