Commit 9553442f authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

Fix yet another DS100 code error

parent 75a943ff

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

+1 −1
Original line number Diff line number Diff line
@@ -4107,7 +4107,7 @@ my @stations = ( 
	[ 'NMOE',  'Mönchröden',                  8004064, 11.057613, 50.302227 ],

	[ 'SML',   'Monreal',                       8004078, 7.153055,  50.296357 ],

	[ 'FMSH',  'Monsheim',                      8000663, 8.208162,  49.633666 ],

	[ 'FMTN',  'Montabaur',                     8000667, 7.825333,  50.444834 ],

	[ 'FMT',   'Montabaur',                     8000667, 7.825333,  50.444834 ],

	[ 'SMON',  'Monzingen',                     8004080, 7.588673,  49.793466 ],

	[ 'AMBH',  'Moorbekhalle',                  8079023, 9.991744,  53.717155 ],

	[ 'SMBT',  'Moosbachtal',                   8079265, 7.754959,  49.165954 ],

scripts/acronyms.pl

+1 −0
Original line number Diff line number Diff line
@@ -62,6 +62,7 @@ while ( my $line = <STDIN> ) { 
	$station =~ s{ ^ EDO \s N $ }{EDO}x;

	$station =~ s{ ^ FBUSS    $ }{FBUS}x;

	$station =~ s{ ^ FH \s\s N$ }{FH}x;

	$station =~ s{ ^ FMTN     $ }{FMT}x;

	$station =~ s{ ^ KAREP    $ }{KARE}x;

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

	$station =~ s{ ^ KDDH     $ }{KDD}x;