Commit 0526f888 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

prominently show zuginfo.nrw links in train details

parent d24433cc
Loading
Loading
Loading
Loading
+10 −0
Original line number Diff line number Diff line
@@ -411,6 +411,7 @@ sub format_hafas_result_info {
sub render_train {
	my ( $self, $result, $departure, $station_name, $template ) = @_;

	$departure->{links}          = [];
	$departure->{route_pre_diff} = [
		$self->json_route_diff(
			[ $result->route_pre ],
@@ -609,6 +610,15 @@ sub render_train {
					if ( $message->{display} ) {
						push( @him_messages,
							[ $message->{header}, $message->{lead} ] );
						if ( $message->{lead} =~ m{zuginfo.nrw/?\?msg=(\d+)} ) {
							push(
								@{ $departure->{links} },
								[
									"Großstörung",
									"https://zuginfo.nrw/?msg=$1"
								]
							);
						}
					}
				}
				for my $message ( @{ $departure->{moreinfo} // [] } ) {
+3 −0
Original line number Diff line number Diff line
@@ -114,6 +114,9 @@
%     }
%     elsif ($icetype and $icetype->[1] and $departure->{train_type} ne 'Bus') {
        <span class="disabledbutton"><i class="material-icons" aria-hidden="true">compare_arrows</i> Plan: <%= $icetype->[0] %></span>
%     }
%     for my $link (@{$departure->{links}}) {
        <a class="smallbutton" href="<%= $link->[1] %>"><i class="material-icons" aria-hidden="true">warning</i> <%= $link->[0] %></a>
%     }
    </div>