summaryrefslogtreecommitdiff
path: root/lib/Travel/Status/DE/IRIS/Result.pm
diff options
context:
space:
mode:
authorDaniel Friesel <derf@finalrewind.org>2022-11-19 21:58:25 +0100
committerDaniel Friesel <derf@finalrewind.org>2022-11-19 21:58:25 +0100
commita187abe014ee0d7dcd9228d72b20206414fb8ce5 (patch)
treeff039d915a3940d4adf0f4b0de8cae4aad725091 /lib/Travel/Status/DE/IRIS/Result.pm
parenta8ebed120dc83195127eaf9d23372d39f2a51490 (diff)
Parse "hi" (arrival_hidden/departure_hidden) attributes
Diffstat (limited to 'lib/Travel/Status/DE/IRIS/Result.pm')
-rw-r--r--lib/Travel/Status/DE/IRIS/Result.pm22
1 files changed, 20 insertions, 2 deletions
diff --git a/lib/Travel/Status/DE/IRIS/Result.pm b/lib/Travel/Status/DE/IRIS/Result.pm
index 9325de5..25abb0a 100644
--- a/lib/Travel/Status/DE/IRIS/Result.pm
+++ b/lib/Travel/Status/DE/IRIS/Result.pm
@@ -130,9 +130,9 @@ my %translation = (
);
Travel::Status::DE::IRIS::Result->mk_ro_accessors(
- qw(arrival arrival_delay arrival_has_realtime arrival_is_additional arrival_is_cancelled
+ qw(arrival arrival_delay arrival_has_realtime arrival_is_additional arrival_is_cancelled arrival_hidden
date datetime delay
- departure departure_delay departure_has_realtime departure_is_additional departure_is_cancelled
+ departure departure_delay departure_has_realtime departure_is_additional departure_is_cancelled departure_hidden
ds100 has_realtime is_transfer is_unscheduled is_wing
line_no old_train_id old_train_no operator platform raw_id
realtime_xml route_start route_end
@@ -278,6 +278,10 @@ sub set_ar {
$self->{arrival_is_cancelled} = 0;
}
+ if ( $attrib{arrival_hidden} ) {
+ $self->{arrival_hidden} = $attrib{arrival_hidden};
+ }
+
# unscheduled arrivals may not appear in the plan, but we do need to
# know their planned arrival time
if ( $attrib{plan_arrival_ts} ) {
@@ -343,6 +347,10 @@ sub set_dp {
$self->{departure_is_cancelled} = 0;
}
+ if ( $attrib{departure_hidden} ) {
+ $self->{departure_hidden} = $attrib{departure_hidden};
+ }
+
# unscheduled arrivals may not appear in the plan, but we do need to
# know their planned arrival time
if ( $attrib{plan_departure_ts} ) {
@@ -911,6 +919,11 @@ no scheduled arrival time (e.g. due to diversions). May be negative.
True if "arrival" is based on real-time data.
+=item $result->arrival_hidden
+
+True if arrival should not be displayed to customers.
+This often indicates an entry-only stop near the beginning of a train's journey.
+
=item $result->arrival_is_additional
True if the arrival at this stop is an additional (unscheduled) event, i.e.,
@@ -984,6 +997,11 @@ no scheduled departure time (e.g. due to diversions). May be negative.
True if "departure" is based on real-time data.
+=item $result->departure_hidden
+
+True if departure should not be displayed to customers.
+This often indicates an exit-only stop near the end of a train's journey.
+
=item $result->departure_is_additional
True if the train's departure at this stop is unscheduled (additional), i.e.,