Merge branch 'Knuspel-changes'1.12.4

1 files changed, 65 insertions, 0 deletions

diff --git a/lib/Travelynx.pm b/lib/Travelynx.pm
index de6b1bc..81e695a 100755
--- a/lib/Travelynx.pm
+++ b/lib/Travelynx.pm
@@ -194,6 +194,68 @@ sub startup {
 
 	$self->attr(
 		coordinates_by_station => sub {
+			my %legacy_names = (
+				'Nordbögge'              => 'Bönen-Nordbögge',
+				'Hamm(Westf)'             => 'Hamm(Westf)Hbf',
+				'Cottbus'                 => 'Cottbus Hbf',
+				'Delft Zuid'              => 'Delft Campus',
+				'Barchel, Oerel'          => 'Barchel',
+				'Biedenkopf-Schulzentrum' => 'Biedenkopf Campus',
+				'Bruchsal Tunnelstr'      => 'Bruchsal Tunnelstraße',
+				'Einbeck Salzderhelden'   => 'Einbeck-Salzderhelden',
+				'Eindhoven'               => 'Eindhoven Centraal',
+				'Escherndorf-Vogelburg'   => 'Escherndorf-Vogelsburg',
+				'Essel, Kutenholz'        => 'Essel',
+				'Europapl./Postgalerie (Karl), Karlsruhe' =>
+				  'Europaplatz/Postgalerie (Karls, Karlsruhe',
+				'Furth i Wald'               => 'Furth im Wald',
+				'Germersheim Bahnhof'        => 'Germersheim',
+				'Glossen (b Oschatz)'        => 'Glossen(b Oschatz)',
+				'Gondelsheim Schloßstadion' => 'Gondelsheim Schlossstadion',
+				'Hagen, Stade'               => 'Hagen(Kr. Stade)',
+				'Holzgerlingen Nord'         => 'Holzgerlingen Hülben',
+				'Karlsruhe Albtalbf'         => 'Karlsruhe Albtalbahnhof',
+				'Karlsruhe Durlacher Tor' =>
+				  'Karlsruhe Durlacher Tor / KIT-Campus Süd',
+				'Karlsruhe Mühlburger Tor' =>
+				  'Karlsruhe Mühlburger Tor (Kaiserallee)',
+				'Korbach'                => 'Korbach Hbf',
+				'Merseburg'              => 'Merseburg Hbf',
+				'Münster(b Dieburg)'    => 'Münster(Hessen)',
+				'Neu Isenburg'           => 'Neu-Isenburg',
+				'Niebüll, Sylt Shuttle' => 'Niebüll Autoverladung',
+				'Olen'                   => 'Olen(Belgien)',
+				'Rahden(Kr Lübbecke)'   => 'Rahden',
+				'Riegel-Malterd.NE'      => 'Riegel-Malterdingen NE',
+				'Siegen'                 => 'Siegen Hbf',
+				'Stendal'                => 'Stendal Hbf',
+				'Teisnach Rohde&Schwarz' => 'Teisnach Rohde+Schwarz',
+				'Thalheim (b Oschatz)'   => 'Thalheim(b Oschatz)',
+				'Timmendorferstrand'     => 'Timmendorfer Strand',
+				'Waldkraiburg'           => 'Waldkraiburg-Kraiburg',
+				'Weinheim(Bergstr)'      => 'Weinheim(Bergstr)Hbf',
+				'Werningerode'           => 'Weringerode Hbf',
+				'Westerland(Sylt), Sylt Shuttle' =>
+				  'Westerland (Sylt) Autoverladung',
+				'Stryck'                   => 'Willingen-Stryck',
+				'Rudersdorf(Siegen)'       => 'Wilnsdorf-Rudersdorf',
+				'Holzhausen-Heddinghausen' => 'Bad Holzhausen',
+				'Hummelberg'               => 'Berghausen Hummelberg',
+				'Wehrden'                  => 'Beverungen-Wehrden',
+				'Bockum-Hövel'            => 'Hamm-Bockum-Hövel',
+				'Brügge(Westf)'           => 'Lüdenscheid-Brügge',
+				'Dieringhausen'            => 'Gummersbach-Dieringhausen',
+				'Eisenbach-Matzenbach'     => 'Matzenbach',
+				'Godelheim'                => 'Höxter-Godelheim',
+				'Heessen'                  => 'Hamm-Heessen',
+				'Lüchtringen'             => 'Höxter-Lüchtringen',
+				'Ottbergen'                => 'Höxter-Ottbergen',
+				'Preußen'                 => 'Lünen-Preußen',
+				'Rudersdorf(Siegen)'       => 'Wilnsdorf-Rudersdorf',
+				'St Augustin Markt'        => 'Sankt Augustin Zentrum',
+				'Untersulzbach'            => 'Sulzbachtal',
+				'Freiburg West'            => 'Freiburg-Landwasser',
+			);
 			my %location;
 			for
 			  my $station ( Travel::Status::DE::IRIS::Stations::get_stations() )
@@ -203,6 +265,9 @@ sub startup {
 					  = [ $station->[4], $station->[3] ];
 				}
 			}
+			while ( my ( $old_name, $new_name ) = each %legacy_names ) {
+				$location{$old_name} = $location{$new_name};
+			}
 			return \%location;
 		}
 	);