Commit 71a6127b authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

fix --track-via <stop> not matching trains changing their ID at <stop>

parent 56685ea8

Changelog

+4 −0
Original line number Original line Diff line number Diff line 
git HEAD



    * Fix --track-via <stop> not matching trains changing their ID at <stop>



Travel::Status::DE::IRIS 0.03 - Fri Feb 14 2014

Travel::Status::DE::IRIS 0.03 - Fri Feb 14 2014





    * IRIS / db-iris: Add lookahead option

    * IRIS / db-iris: Add lookahead option

bin/db-iris

+5 −1
Original line number Original line Diff line number Diff line
@@ -302,7 +302,11 @@ for my $d ( $status->results() ) { 
		if ( not $d->departure ) {

		if ( not $d->departure ) {

			next;

			next;

		}

		}

		my $d_via = first { $_->train_id eq $d->train_id } $status_via->results;

		my $d_via = first {

			$_->train_id eq $d->train_id

			  or ( $_->old_train_id and $_->old_train_id eq $d->train_id );

		}

		$status_via->results;

		if (   not $d_via

		if (   not $d_via

			or not $d_via->sched_arrival

			or not $d_via->sched_arrival

			or $d_via->sched_arrival < $d->departure )

			or $d_via->sched_arrival < $d->departure )