diff options
| author | Birte Kristina Friesel <derf@finalrewind.org> | 2023-12-30 11:37:50 +0100 |
|---|---|---|
| committer | Birte Kristina Friesel <derf@finalrewind.org> | 2023-12-30 11:37:50 +0100 |
| commit | 457ea50fc0cedbfde502de7ecb1923e17d28e940 (patch) | |
| tree | 22cbe421974e166f43f27c6cb986139c354fa744 | |
| parent | f6eb842b8cf362f7afd13e4099b7424d817c0034 (diff) | |
Journey: add is_additional accessor
| -rw-r--r-- | lib/Travel/Status/DE/HAFAS/Journey.pm | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/lib/Travel/Status/DE/HAFAS/Journey.pm b/lib/Travel/Status/DE/HAFAS/Journey.pm index 593b9c6..90c336c 100644 --- a/lib/Travel/Status/DE/HAFAS/Journey.pm +++ b/lib/Travel/Status/DE/HAFAS/Journey.pm @@ -15,7 +15,7 @@ our $VERSION = '5.03'; Travel::Status::DE::HAFAS::Journey->mk_ro_accessors( qw(datetime sched_datetime rt_datetime - is_cancelled is_partially_cancelled + is_additional is_cancelled is_partially_cancelled 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) @@ -161,6 +161,7 @@ sub new { $ref->{destination} = $ref->{route_end}; $ref->{is_cancelled} ||= $journey->{stbStop}{dCncl}; } + $ref->{is_additional} = $journey->{stbStop}{isAdd}; } else { $ref->{route_start} = $stops[0]{loc}->name; @@ -479,6 +480,11 @@ undef if neither is available. Delay in minutes, or undef if it is unknown. Also returns undef if the arrival/departure has been cancelled. +=item $journey->is_additional (station only) + +True if the journey's stop at the requested station is an unscheduled addition +to its route. + =item $journey->is_cancelled True if the journey was cancelled, false otherwise. |