Unverified Commit 150c5a13 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

wagon order: show first / second class if known

parent bb9b31f5
Loading
Loading
Loading
Loading
+6 −1
Original line number Diff line number Diff line
@@ -78,10 +78,15 @@
						% }
						<a href="https://dbf.finalrewind.org/_wr/<%= $journey->{train_no} %>/<%= $journey->{sched_departure}->strftime('%Y%m%d%H%M') %>?e=<%= $journey->{dep_direction} // q{} %>">
						%= $direction
						% my $gi;
						% for my $wagon (@wagons) {
							% if (not ($wagon->is_locomotive or $wagon->is_powercar)) {
								%= $wagon->number || $wagon->type
								% if (defined $gi and $gi != $wagon->group_index) {

								% }
								%= $wagon->number || ($wagon->type =~ m{AB} ? '½' : $wagon->type =~ m{A} ? '1.' : $wagon->type =~ m{B} ? '2.' : $wagon->type )
							% }
							% $gi = $wagon->group_index;
						% }
						%= $direction
						</a>