diff options
-rw-r--r-- | templates/_checked_in.html.ep | 14 |
1 files changed, 11 insertions, 3 deletions
diff --git a/templates/_checked_in.html.ep b/templates/_checked_in.html.ep index 2e5569a..4e056da 100644 --- a/templates/_checked_in.html.ep +++ b/templates/_checked_in.html.ep @@ -54,14 +54,22 @@ % } % if (my $wr = $journey->{wagonorder}) { <br/> + % my @wagons = $wr->wagons; + % my $direction = $wr->direction == 100 ? '→' : '←'; + % if ($journey->{dep_direction}) { + % $direction = $journey->{dep_direction} eq 'l' ? '◀' : '▶'; + % if (($journey->{dep_direction} eq 'l' ? 0 : 100) != $wr->direction) { + % @wagons = reverse @wagons; + % } + % } <a href="https://marudor.de/<%= $journey->{dep_name} %>?selectedDetail=<%= $journey->{train_id} %>"> - %= $wr->direction == 100 ? '→' : '←'; - % for my $wagon ($wr->wagons) { + %= $direction + % for my $wagon (@wagons) { % if (not ($wagon->is_locomotive or $wagon->is_powercar)) { %= $wagon->number || $wagon->type % } % } - %= $wr->direction == 100 ? '→' : '←'; + %= $direction </a> % } </div> |