From 8ad7cfccf15da80813535f65f0fbb1cf2b7a6d9e Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Mon, 3 Mar 2014 20:42:46 +0100 Subject: yet another platform name fix --- lib/Travel/Status/DE/EFA.pm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/lib/Travel/Status/DE/EFA.pm b/lib/Travel/Status/DE/EFA.pm index 0f199c6..d22b136 100644 --- a/lib/Travel/Status/DE/EFA.pm +++ b/lib/Travel/Status/DE/EFA.pm @@ -347,9 +347,12 @@ sub results { $platform_is_db = 1; } - if ($platform_name) { + if ( $platform_name and $platform_name =~ m{ ^ (Gleis | Bstg\.)}ox ) { $platform = ( split( / /, $platform_name ) )[1]; } + elsif ( $platform_name and not $platform ) { + $platform = $platform_name; + } push( @results, -- cgit v1.2.3