From 062f0355a6022ba8d95bcd4c770cf793c0473dc3 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Thu, 1 Oct 2020 21:55:38 +0200 Subject: Result: Add "operator" accessor --- lib/Travel/Status/DE/IRIS.pm | 10 +++++----- lib/Travel/Status/DE/IRIS/Result.pm | 2 +- 2 files changed, 6 insertions(+), 6 deletions(-) diff --git a/lib/Travel/Status/DE/IRIS.pm b/lib/Travel/Status/DE/IRIS.pm index 616c782..6777aec 100644 --- a/lib/Travel/Status/DE/IRIS.pm +++ b/lib/Travel/Status/DE/IRIS.pm @@ -325,14 +325,14 @@ sub add_result { my %data = ( raw_id => $id, - classes => $e_tl->getAttribute('f'), # D N S F - train_no => $e_tl->getAttribute('n'), # dep number - type => $e_tl->getAttribute('c'), # S/ICE/ERB/... + classes => $e_tl->getAttribute('f'), # D N S F + operator => $e_tl->getAttribute('o'), # coded operator: 03/80/R2/... + train_no => $e_tl->getAttribute('n'), # dep number + type => $e_tl->getAttribute('c'), # S/ICE/ERB/... station => $station_name, - station_uic => $station_uic + 0, # UIC IDs are numbers + station_uic => $station_uic + 0, # UIC IDs are numbers strptime_obj => $self->{strptime_obj}, - #unknown_o => $e_tl->getAttribute('o'), # owner: 03/80/R2/... #unknown_t => $e_tl->getAttribute('t'), # p ); diff --git a/lib/Travel/Status/DE/IRIS/Result.pm b/lib/Travel/Status/DE/IRIS/Result.pm index f67e52f..3989d22 100644 --- a/lib/Travel/Status/DE/IRIS/Result.pm +++ b/lib/Travel/Status/DE/IRIS/Result.pm @@ -113,7 +113,7 @@ Travel::Status::DE::IRIS::Result->mk_ro_accessors( date datetime delay departure departure_delay departure_is_additional departure_is_cancelled ds100 is_transfer is_unscheduled is_wing - line_no old_train_id old_train_no platform raw_id + line_no old_train_id old_train_no operator platform raw_id realtime_xml route_start route_end sched_arrival sched_departure sched_platform sched_route_start sched_route_end start -- cgit v1.2.3