diff options
Diffstat (limited to 'lib/Travel/Routing/DE/DBRIS/Connection/Segment.pm')
| -rw-r--r-- | lib/Travel/Routing/DE/DBRIS/Connection/Segment.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lib/Travel/Routing/DE/DBRIS/Connection/Segment.pm b/lib/Travel/Routing/DE/DBRIS/Connection/Segment.pm index f2278ef..1b01d77 100644 --- a/lib/Travel/Routing/DE/DBRIS/Connection/Segment.pm +++ b/lib/Travel/Routing/DE/DBRIS/Connection/Segment.pm @@ -18,7 +18,7 @@ Travel::Routing::DE::DBRIS::Connection::Segment->mk_ro_accessors( sched_dep rt_dep dep dep_platform sched_arr rt_arr arr arr_platform sched_duration rt_duration duration duration_percent - arr_delay dep_delay delay + arr_delay dep_delay delay feasibility is_unlikely journey_id occupancy occupancy_first occupancy_second is_transfer is_walk walk_name distance_m @@ -42,6 +42,7 @@ sub new { train_long => $json->{verkehrsmittel}{langText}, direction => $json->{verkehrsmittel}{richtung}, distance_m => $json->{distanz}, + feasibility => $json->{anschlussBewertungCode}, }; if ( my $ts = $json->{abfahrtsZeitpunkt} ) { @@ -134,6 +135,9 @@ sub new { for my $message ( @{ $json->{risNotizen} // [] } ) { push( @{ $ref->{messages_ris} }, $message ); + if ( $message->{key} eq 'text.realtime.journey.missed.connection' ) { + $ref->{is_unlikely} = 1; + } } for my $message ( @{ $json->{priorisierteMeldungen} // [] } ) { |