Commit b245e3a0 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

fix Stuttgart Hbf (tief) and Stuttgart-Feuerbach (errors in data source)

parent e9b63cde

lib/Travel/Status/DE/IRIS/Stations.pm

+2 −2
Original line number Diff line number Diff line
@@ -5856,7 +5856,7 @@ my @stations = ( 
	[ 'TSMI',  'Stuttgart Stadtmitte',          8006700, 9.172925,  48.776229 ],

	[ 'TSUN',  'Stuttgart Universität',        8006513, 9.105398,  48.745837 ],

	[ 'TSC',   'Stuttgart-Bad Cannstatt',       8005769, 9.217531,  48.801377 ],

	[ 'TSZ F', 'Stuttgart-Feuerbach',           8005770, 9.169382,  48.813673 ],

	[ 'TSFE',  'Stuttgart-Feuerbach',           8005770, 9.169382,  48.813673 ],

	[ 'TSM',   'Stuttgart-Münster',            8005771, 9.21586,   48.820724 ],

	[ 'TSOM',  'Stuttgart-Obertürkheim',       8005772, 9.267889,  48.762013 ],

	[ 'TSOS',  'Stuttgart-Österfeld',          8005779, 9.116774,  48.737651 ],

scripts/acronyms.pl

+2 −0
Original line number Diff line number Diff line
@@ -68,6 +68,8 @@ while ( my $line = <STDIN> ) { 
	$station =~ s{ ^ KDFFH    $ }{KDFF}x;

	$station =~ s{ ^ KDN \s P $ }{KDN}x;

	$station =~ s{ ^ KRY \s P $ }{KRY}x;

	$station =~ s{ ^ TS \s\s T$ }{TST}x;

	$station =~ s{ ^ TSZ \s F $ }{TSFE}x;



	printf(

		"\t['%s','%s',%s,%s,%s],\n",