blob: 5951e7d826ac82509daffd7f43b13cfa12be49c2 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
<table class="striped"><tbody>
% for my $res (@{$transit_fyi}) {
% my ($info, $via, $via_arr) = @{$res};
% $via_arr = $via_arr ? $via_arr->strftime('%H:%M') : q{};
<tr>
<td>
%= $info->{line}
</td>
<td>
%= $via
</td>
<td>
%= $info->{departure}->strftime('%H:%M')
→
%= $via_arr
% if ($info->{departure_delay}) {
%= sprintf('(%+d)', $info->{departure_delay})
% }
</td>
</tr>
% }
</tbody></table>
|
