Commit 75a943ff authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

Fix another wrong entry in the OpenData station list

parent 9a03a163
Loading
Loading
Loading
Loading
+1 −1
Original line number Diff line number Diff line
@@ -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 ],
+1 −0
Original line number Diff line number Diff line
@@ -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;