From 4698b575fec73f19c792e28d8c64461a649f5bbe Mon Sep 17 00:00:00 2001 From: Birte Kristina Friesel Date: Sun, 29 Dec 2024 12:37:00 +0100 Subject: Journey: Parse priorisierteMeldungen --- lib/Travel/Status/DE/DBRIS/Journey.pm | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'lib/Travel/Status/DE/DBRIS') diff --git a/lib/Travel/Status/DE/DBRIS/Journey.pm b/lib/Travel/Status/DE/DBRIS/Journey.pm index 4900809..98d56cb 100644 --- a/lib/Travel/Status/DE/DBRIS/Journey.pm +++ b/lib/Travel/Status/DE/DBRIS/Journey.pm @@ -33,6 +33,10 @@ sub new { push( @{ $ref->{messages} }, $message ); } + for my $message ( @{ $json->{priorisierteMeldungen} // [] } ) { + push( @{ $ref->{messages} }, $message ); + } + for my $attr ( @{ $json->{zugattribute} // [] } ) { push( @{ $ref->{attributes} }, $attr ); } -- cgit v1.2.3