diff --git a/index.pl b/index.pl index 24cdc91..bb3fee8 100755 --- a/index.pl +++ b/index.pl @@ -647,6 +647,12 @@ post '/action' => sub { } }; +get '/a/history' => sub { + my ($self) = @_; + + $self->render('history'); +}; + get '/x/about' => sub { my ($self) = @_; diff --git a/templates/history.html.ep b/templates/history.html.ep new file mode 100644 index 0000000..3c798a4 --- /dev/null +++ b/templates/history.html.ep @@ -0,0 +1,30 @@ +
Datum | +Zug | +Strecke | +Dauer | +|
---|---|---|---|---|
<%= $travel->{sched_departure}->strftime('%d.%m.%Y') %> | +<%= $travel->{type} %> <%= $travel->{line} // $travel->{no} %> | +<%= $travel->{from_name} %> → <%= $travel->{to_name} %> | + % if ($travel->{rt_arrival} and $travel->{rt_departure}) { +<%= ($travel->{rt_arrival}->epoch - $travel->{rt_departure}->epoch) / 60 %> min | + % } + % else { +? | + % } +