Added links for old/new station names.

This commit is contained in:
Knuspel 2019-12-28 14:35:07 +01:00
parent 74a1f731c8
commit d8b46dff89

View file

@ -194,6 +194,64 @@ 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 +261,9 @@ sub startup {
= [ $station->[4], $station->[3] ];
}
}
while (my ($old_name, $new_name) = each %legacy_names) {
$location{$old_name} = $location{$new_name};
}
return \%location;
}
);