Unverified Commit 6b4a82da authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

inconsistent journeys: link to journeys

parent f115283c
Loading
Loading
Loading
Loading
+13 −0
Original line number Diff line number Diff line
@@ -1287,6 +1287,19 @@ my @migrations = (
			}
		);
	},

	# v30 -> v31
	# travelynx v1.29.17 introduces links to conflicting journeys.
	# These require changes to statistics data.
	sub {
		my ($db) = @_;
		$db->query(
			qq{
				truncate journey_stats;
				update schema_version set version = 31;
			}
		);
	},
);

sub sync_stations {
+8 −2
Original line number Diff line number Diff line
@@ -1486,8 +1486,14 @@ sub compute_stats {
			and $next_departure - $journey->{rt_arr_ts} < ( 60 * 60 ) )
		{
			if ( $next_departure - $journey->{rt_arr_ts} < 0 ) {
				push( @inconsistencies,
					epoch_to_dt($next_departure)->strftime('%d.%m.%Y %H:%M') );
				push(
					@inconsistencies,
					[
						epoch_to_dt($next_departure)
						  ->strftime('%d.%m.%Y %H:%M'),
						$journey->{id}
					]
				);
			}
			else {
				$interchange_real
+4 −0
Original line number Diff line number Diff line
@@ -22,6 +22,10 @@ a.unmarked {
  color: $off-black;
}

.white-text a {
  color: #eeeeff;
}

div.targetlist {
  display: grid;
  grid-template-columns: 1fr max-content;
+2 −2
Original line number Diff line number Diff line
@@ -10,8 +10,8 @@
						vorherigen Zugfahrt und wurden bei der Wartezeitberechnung
						ignoriert.
						<ul>
							% for my $date (@{$stats->{inconsistencies}}) {
								<li><%= $date %></li>
							% for my $field (@{$stats->{inconsistencies}}) {
								<li><a href="/journey/<%= $field->[1] %>"><%= $field->[0] %></a></li>
							% }
						</ul>
					</p>