summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDaniel Friesel <derf@finalrewind.org>2016-09-16 09:17:05 +0200
committerDaniel Friesel <derf@finalrewind.org>2016-09-16 09:17:05 +0200
commit75a943ffd9c286cb3ffee85f949cf12db14620c0 (patch)
tree1a808d7ab1d5986a12cae68d5008d81018a28e88
parent9a03a1638c8d5ca386bab06b2fb09c05c6c5825b (diff)
Fix another wrong entry in the OpenData station list
-rw-r--r--lib/Travel/Status/DE/IRIS/Stations.pm2
-rwxr-xr-xscripts/acronyms.pl1
2 files changed, 2 insertions, 1 deletions
diff --git a/lib/Travel/Status/DE/IRIS/Stations.pm b/lib/Travel/Status/DE/IRIS/Stations.pm
index d56bba4..9dcf08f 100644
--- a/lib/Travel/Status/DE/IRIS/Stations.pm
+++ b/lib/Travel/Status/DE/IRIS/Stations.pm
@@ -2099,7 +2099,7 @@ my @stations = (
[ 'LGG', 'Geestgottberg', 8010121, 11.736957, 52.955743 ],
[ 'UGB', 'Gehlberg', 8011603, 10.769351, 50.683768 ],
[ 'NGET', 'Geigant', 8002205, 12.681424, 49.323354 ],
- [ 'KGKK', 'Geilenkirchen', 8002206, 6.124518, 50.961039 ],
+ [ 'KGEK', 'Geilenkirchen', 8002206, 6.124518, 50.961039 ],
[ 'KGEH', 'Geilhausen', 8002207, 7.638667, 50.77157 ],
[ 'MGLG', 'Geiselhöring', 8002209, 12.392077, 48.822392 ],
[ 'MGIB', 'Geisenbrunn', 8002210, 11.324847, 48.109157 ],
diff --git a/scripts/acronyms.pl b/scripts/acronyms.pl
index cb9f243..97092f7 100755
--- a/scripts/acronyms.pl
+++ b/scripts/acronyms.pl
@@ -67,6 +67,7 @@ while ( my $line = <STDIN> ) {
$station =~ s{ ^ KDDH $ }{KDD}x;
$station =~ s{ ^ KDFFH $ }{KDFF}x;
$station =~ s{ ^ KDN \s P $ }{KDN}x;
+ $station =~ s{ ^ KGKK $ }{KGEK}x;
$station =~ s{ ^ KRY \s P $ }{KRY}x;
$station =~ s{ ^ TS \s\s T$ }{TST}x;
$station =~ s{ ^ TSZ \s F $ }{TSFE}x;