Result: remove train_no_transfer accessor

1 files changed, 1 insertions, 12 deletions

diff --git a/lib/Travel/Status/DE/IRIS/Result.pm b/lib/Travel/Status/DE/IRIS/Result.pm
index 82659b3..ebcb5be 100644
--- a/lib/Travel/Status/DE/IRIS/Result.pm
+++ b/lib/Travel/Status/DE/IRIS/Result.pm
@@ -96,7 +96,7 @@ my %translation = (
 
 Travel::Status::DE::IRIS::Result->mk_ro_accessors(
 	qw(arrival classes date datetime delay departure is_cancelled is_transfer
-	  is_unscheduled is_wing line_no train_no_transfer old_train_id
+	  is_unscheduled is_wing line_no old_train_id
 	  old_train_no platform raw_id realtime_xml route_start route_end
 	  sched_arrival sched_departure sched_platform sched_route_start
 	  sched_route_end start stop_no time train_id train_no transfer type
@@ -312,8 +312,6 @@ sub set_realtime {
 sub set_ref {
 	my ( $self, %attrib ) = @_;
 
-	$self->{train_no_transfer} = $attrib{train_no};
-
 	# TODO
 
 	return $self;
@@ -1008,15 +1006,6 @@ year.  Note that it may change during the yearly itinerary update in december.
 
 Number of this train, unique per day. E.g. C<< 2225 >> for C<< IC 2225 >>.
 
-=item $result->train_no_transfer
-
-Number of this train after a following transfer, undefined if no such transfer
-exists. See B<is_transfer> for a note about this.
-
-Note that unlike B<old_train_no>, this information is always based on realtime
-data (not included in any schedule) and only set for stations before the
-transfer station, not the transfer station itself.
-
 =item $result->type
 
 Type of this train, e.g. C<< S >> for S-Bahn, C<< RE >> for Regional-Express,