diff options
| -rw-r--r-- | lib/Travel/Status/DE/IRIS/Stations.pm | 2 | ||||
| -rwxr-xr-x | scripts/acronyms.pl | 1 |
2 files changed, 1 insertions, 2 deletions
diff --git a/lib/Travel/Status/DE/IRIS/Stations.pm b/lib/Travel/Status/DE/IRIS/Stations.pm index c252ef9..49f42d6 100644 --- a/lib/Travel/Status/DE/IRIS/Stations.pm +++ b/lib/Travel/Status/DE/IRIS/Stations.pm @@ -5848,7 +5848,7 @@ my @stations = ( [ 'TSFS', 'Stuttgart Feuersee', 8006699, 9.166273, 48.772768 ], [ 'TFL', 'Stuttgart Flughafen/Messe', 8005768, 9.19263, 48.690648 ], [ 'TS', 'Stuttgart Hbf', 8000096, 9.181635, 48.784084 ], - [ 'TST', 'Stuttgart Hbf (tief)', 8098096, 9.179808, 48.782999 ], + [ 'TS T', 'Stuttgart Hbf (tief)', 8098096, 9.179808, 48.782999 ], [ 'TSNS', 'Stuttgart Neckarpark', 8006743, 9.241595, 48.792173 ], [ 'TSN', 'Stuttgart Nord', 8005767, 9.188026, 48.803769 ], [ 'TSNU', 'Stuttgart Nürnberger Str.', 8004357, 9.234858, 48.806423 ], diff --git a/scripts/acronyms.pl b/scripts/acronyms.pl index 920a9d9..fec94a5 100755 --- a/scripts/acronyms.pl +++ b/scripts/acronyms.pl @@ -71,7 +71,6 @@ while ( my $line = <STDIN> ) { $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; printf( |