diff options
author | Birte Kristina Friesel <derf@finalrewind.org> | 2024-11-05 21:38:51 +0100 |
---|---|---|
committer | Birte Kristina Friesel <derf@finalrewind.org> | 2024-11-05 21:38:51 +0100 |
commit | 45845964a3028b8baf35e447e3fdb4c67e39eec0 (patch) | |
tree | 2e5c6f5bc177fd6766988c9571e666f7fe9a2f30 /lib/DBInfoscreen/Controller/Stationboard.pm | |
parent | 042a59c865ab5a319bee0844368fd42df2e502b9 (diff) |
IRIS, HAFAS: Pass version=raw to obtain raw serialized Perl objects
Diffstat (limited to 'lib/DBInfoscreen/Controller/Stationboard.pm')
-rw-r--r-- | lib/DBInfoscreen/Controller/Stationboard.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/DBInfoscreen/Controller/Stationboard.pm b/lib/DBInfoscreen/Controller/Stationboard.pm index 0e1c6aa..8c8365f 100644 --- a/lib/DBInfoscreen/Controller/Stationboard.pm +++ b/lib/DBInfoscreen/Controller/Stationboard.pm @@ -1977,6 +1977,9 @@ sub handle_result { ); return; } + elsif ( $apiver eq 'raw' ) { + push( @departures, $result ); + } else { # apiver == 3 if ( $result->isa('Travel::Status::DE::IRIS::Result') ) { my ( $delay_arr, $delay_dep, $sched_arr, $sched_dep ); |