From b070e55eaeb6df7cb39235463ca7df7dd2c6bcc0 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Sat, 13 Oct 2018 14:40:19 +0200 Subject: add history page --- index.pl | 6 ++++++ templates/history.html.ep | 30 ++++++++++++++++++++++++++++++ templates/layouts/default.html.ep | 1 + 3 files changed, 37 insertions(+) create mode 100644 templates/history.html.ep 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 @@ +

Bisherige Fahrten

+
+ + + + + + + + + + + % for my $travel (get_user_travels(0)) { + % if ($travel->{completed}) { + + + + + % if ($travel->{rt_arrival} and $travel->{rt_departure}) { + + % } + % else { + + % } + + % } + % } + + + diff --git a/templates/layouts/default.html.ep b/templates/layouts/default.html.ep index 2e07ffe..19be177 100644 --- a/templates/layouts/default.html.ep +++ b/templates/layouts/default.html.ep @@ -21,6 +21,7 @@
-- cgit v1.2.3
DatumZugStreckeDauer
<%= $travel->{sched_departure}->strftime('%d.%m.%Y') %><%= $travel->{type} %> <%= $travel->{line} // $travel->{no} %><%= $travel->{from_name} %> → <%= $travel->{to_name} %><%= ($travel->{rt_arrival}->epoch - $travel->{rt_departure}->epoch) / 60 %> min?