Commit 062f0355 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

Result: Add "operator" accessor

parent fb38fe52

lib/Travel/Status/DE/IRIS.pm

+5 −5
Original line number Diff line number Diff line
@@ -326,13 +326,13 @@ sub add_result { 
	my %data = (

		raw_id       => $id,

		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

		strptime_obj => $self->{strptime_obj},



		#unknown_o    => $e_tl->getAttribute('o'),    # owner: 03/80/R2/...

		#unknown_t    => $e_tl->getAttribute('t'),    # p

	);

lib/Travel/Status/DE/IRIS/Result.pm

+1 −1
Original line number Diff line number Diff line
@@ -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