diff options
| author | Daniel Friesel <derf@finalrewind.org> | 2016-06-25 20:07:11 +0200 |
|---|---|---|
| committer | Daniel Friesel <derf@finalrewind.org> | 2016-06-25 20:07:11 +0200 |
| commit | b245e3a0786cfcd76c5fe91987870af3774f4446 (patch) | |
| tree | 12363c2014b930f278c274db15b1f19b10ef35b1 /scripts/acronyms.pl | |
| parent | e9b63cdead046b656d0f9e6b7ecbccc523363994 (diff) | |
fix Stuttgart Hbf (tief) and Stuttgart-Feuerbach (errors in data source)
Diffstat (limited to 'scripts/acronyms.pl')
| -rwxr-xr-x | scripts/acronyms.pl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/scripts/acronyms.pl b/scripts/acronyms.pl index ffc14bd..d4ba9cb 100755 --- a/scripts/acronyms.pl +++ b/scripts/acronyms.pl @@ -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", |