From 6992ed858018ece96109d9bf07e4ff59e0052337 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Sun, 11 Mar 2018 09:37:58 +0100 Subject: Fix DS100 code for Dülmen MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- lib/Travel/Status/DE/IRIS/Stations.pm | 2 +- scripts/acronyms.pl | 1 + 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/lib/Travel/Status/DE/IRIS/Stations.pm b/lib/Travel/Status/DE/IRIS/Stations.pm index 49f42d6..92951f5 100644 --- a/lib/Travel/Status/DE/IRIS/Stations.pm +++ b/lib/Travel/Status/DE/IRIS/Stations.pm @@ -1462,7 +1462,7 @@ my @stations = ( [ 'KDUK', 'Duckterath', 8001566, 7.103496, 50.984815 ], [ 'SDUW', 'Dudweiler', 8001570, 7.027351, 49.277299 ], [ 'KDUL', 'Dülken', 8001571, 6.33793, 51.257149 ], - [ 'EDULH', 'Dülmen', 8000083, 7.295765, 51.827676 ], + [ 'EDUL', 'Dülmen', 8000083, 7.295765, 51.827676 ], [ 'KDN', 'Düren', 8000084, 6.482451, 50.809517 ], [ 'KDNS', 'Düren Annakirmesplatz', 8007818, 6.474259, 50.796237 ], [ 'KDNG', 'Düren Im Großen Tal', 8007836, 6.47431, 50.83302 ], diff --git a/scripts/acronyms.pl b/scripts/acronyms.pl index fec94a5..a9a990a 100755 --- a/scripts/acronyms.pl +++ b/scripts/acronyms.pl @@ -60,6 +60,7 @@ while ( my $line = ) { $station =~ s{ ^ EBIL $ }{EBILP}x; $station =~ s{ ^ EBLA $ }{EBP}x; $station =~ s{ ^ EBTHP $ }{EBTH}x; + $station =~ s{ ^ EDULH $ }{EDUL}x; $station =~ s{ ^ EDO \s N $ }{EDO}x; $station =~ s{ ^ FBUSS $ }{FBUS}x; $station =~ s{ ^ FH \s\s N$ }{FH}x; -- cgit v1.2.3