wagon order: show first / second class if known

derf · Mar 20, 2024 · 150c5a1 · 150c5a1
1 parent bb9b31f
commit 150c5a1
Showing 1 changed file with 6 additions and 1 deletion.
diff --git a/templates/_checked_in.html.ep b/templates/_checked_in.html.ep
@@ -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>