diff options
Diffstat (limited to 'lib/DBInfoscreen/Helper/Wagonorder.pm')
| -rw-r--r-- | lib/DBInfoscreen/Helper/Wagonorder.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/DBInfoscreen/Helper/Wagonorder.pm b/lib/DBInfoscreen/Helper/Wagonorder.pm index 94eebb1..c736816 100644 --- a/lib/DBInfoscreen/Helper/Wagonorder.pm +++ b/lib/DBInfoscreen/Helper/Wagonorder.pm @@ -8,6 +8,7 @@ use strict; use warnings; use 5.020; +use DateTime; use Mojo::Promise; sub new { @@ -93,6 +94,8 @@ sub get_p { $self->{log}->debug("wagonorder->get_p($url): OK"); my $json = $tx->res->json; + $json->{ts} = DateTime->now( time_zone => 'Europe/Berlin' ) + ->strftime('%d.%m.%Y %H:%M'); $self->{main_cache}->freeze( $url, $json ); $promise->resolve( $json, \%param ); |