summaryrefslogtreecommitdiff
path: root/lib/Travel/Status/DE/HAFAS/Journey.pm
diff options
context:
space:
mode:
authorDaniel Friesel <derf@finalrewind.org>2023-02-04 17:59:42 +0100
committerDaniel Friesel <derf@finalrewind.org>2023-02-04 18:04:29 +0100
commita6b9a58d4c5e2b0263dfde41257a87237739d996 (patch)
tree136662d4b82ee682b003eff2e8e8aaac00165a5d /lib/Travel/Status/DE/HAFAS/Journey.pm
parent961ba29db5c126177db9710ede1ce866ca5e0033 (diff)
Journey: rename uic to eva
Diffstat (limited to 'lib/Travel/Status/DE/HAFAS/Journey.pm')
-rw-r--r--lib/Travel/Status/DE/HAFAS/Journey.pm13
1 files changed, 9 insertions, 4 deletions
diff --git a/lib/Travel/Status/DE/HAFAS/Journey.pm b/lib/Travel/Status/DE/HAFAS/Journey.pm
index 69f8434..2d13288 100644
--- a/lib/Travel/Status/DE/HAFAS/Journey.pm
+++ b/lib/Travel/Status/DE/HAFAS/Journey.pm
@@ -15,7 +15,7 @@ our $VERSION = '4.05';
Travel::Status::DE::HAFAS::Journey->mk_ro_accessors(
qw(datetime sched_datetime rt_datetime
is_cancelled is_partially_cancelled
- station station_uic platform sched_platform rt_platform operator
+ station station_eva platform sched_platform rt_platform operator
id name type type_long class number line line_no load delay
route_end route_start origin destination direction)
);
@@ -200,7 +200,7 @@ sub new {
if ( $journey->{stbStop} ) {
$ref->{station} = $locL[ $journey->{stbStop}{locX} ]->{name};
- $ref->{station_uic} = 0 + $locL[ $journey->{stbStop}{locX} ]->{extId};
+ $ref->{station_eva} = 0 + $locL[ $journey->{stbStop}{locX} ]->{extId};
$ref->{sched_platform} = $journey->{stbStop}{dPlatfS};
$ref->{rt_platform} = $journey->{stbStop}{dPlatfR};
$ref->{platform} = $ref->{rt_platform} // $ref->{sched_platform};
@@ -254,6 +254,12 @@ sub new {
# {{{ Accessors
+# Legacy
+sub station_uic {
+ my ($self) = @_;
+ return $self->{station_eva};
+}
+
sub is_changed_platform {
my ($self) = @_;
@@ -546,10 +552,9 @@ if the backend does not provide an operator.
Name of the station at which this journey was requested.
-=item $journey->station_uic (station only)
+=item $journey->station_eva (station only)
UIC/EVA ID of the station at which this journey was requested.
-May be renamed in future releases.
=item $journey->route