diff options
| author | Daniel Friesel <derf@finalrewind.org> | 2019-11-19 21:50:23 +0100 |
|---|---|---|
| committer | Daniel Friesel <derf@finalrewind.org> | 2019-11-19 21:50:23 +0100 |
| commit | 48f6dcd45adec36b6e48c1913e03eb6ed8f9e133 (patch) | |
| tree | d44348a951502ad1b983740c4e95fca48ca47a6e /lib/Travel/Status/DE/IRIS/Stations.pm.PL | |
| parent | 33ce867b1bd4abb8fc9dde049507937182b9c6e3 (diff) | |
Rename UIC to EVA. EVA IDs are often (but not always!) UIC IDs
Diffstat (limited to 'lib/Travel/Status/DE/IRIS/Stations.pm.PL')
| -rw-r--r-- | lib/Travel/Status/DE/IRIS/Stations.pm.PL | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lib/Travel/Status/DE/IRIS/Stations.pm.PL b/lib/Travel/Status/DE/IRIS/Stations.pm.PL index 7cccd53..4fbfb44 100644 --- a/lib/Travel/Status/DE/IRIS/Stations.pm.PL +++ b/lib/Travel/Status/DE/IRIS/Stations.pm.PL @@ -47,7 +47,7 @@ for my $station (@{$stations}) { "['%s','%s',%s,%s,%s],\n", $station->{ds100}, $station->{name}, - $station->{uic}, + $station->{eva}, $station->{latlong}[1], $station->{latlong}[0], ); @@ -57,7 +57,7 @@ for my $station (@{$stations}) { "['%s','%s',%s],\n", $station->{ds100}, $station->{name}, - $station->{uic} + $station->{eva} ); } } @@ -205,7 +205,7 @@ that it may contain space characters. =item * Station name -=item * International station number (UIC number / IBNR, "Internationale Bahnhofsnummer") +=item * EVA station number (often, but not always, same as UIC station number) =item * Station longitude, if available @@ -225,7 +225,7 @@ Returns a list of all known stations, lexically sorted by station name. Returns a list of stations matching I<$in>. -If a I<$in> is a valid station (either DS100 code or UIC/EVA number), +If a I<$in> is a valid station (either DS100 code or EVA number), a single array reference describing the station is returned. Otherwise, I<$in> is passed to get_station_by_name(I<$in>) (see below). |