Commit aac8e2a0 authored by Daniel Friesel's avatar Daniel Friesel
Browse files

Save scheduled arrival time for cancelled trains

parent 2075c896

lib/Travelynx.pm

+7 −4
Original line number Diff line number Diff line
@@ -585,9 +585,10 @@ sub startup { 
				);

			}



			if ( not( defined $train or $force ) ) {

			if ( not defined $train ) {



				# Arrival time via IRIS is unknown, try falling back to HAFAS

               # Arrival time via IRIS is unknown, so the train probably has not

               # arrived yet. Fall back to HAFAS.

				if ( my $station_data

					= first { $_->[0] eq $station } @{ $journey->{route} } )

				{
@@ -611,9 +612,11 @@ sub startup { 
						);

					}

				}

				if ( not $force ) {

					$self->run_hook( $uid, 'update' );

					return ( 1, undef );

				}

			}



			my $has_arrived = 0;

templates/landingpage.html.ep

+2 −4
Original line number Diff line number Diff line
@@ -26,10 +26,8 @@ 
							ab <%= $status->{dep_name} %>, doch dieser Zug fällt aus.

							</p>

						<p>Falls du den Zugausfall z.B. für ein Fahrgastrechteformular

							dokumentieren möchtest, wähle bitte jetzt deine geplante

							Zielstation aus. Achtung: Momentan wird dabei keine

							Soll-Ankunftszeit gespeichert, das zu beheben steht auf

							der Todoliste.</p>

							dokumentieren möchtest, wähle bitte jetzt die geplante

							Zielstation aus.</p>

						<table>

							<tbody>

								% my $is_after = 0;