X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FFile%2FBackend%2FFilesystem.pm;h=ec67d7414f474f562dd25e0e45de8f3f7abeadf4;hb=4af01ce416458581a85d5a836c147bd214eb03bd;hp=92292838090ca6e28121644edeafdaac3af60161;hpb=48baa5ebf4441c31d45d0111a0fe8b88d10a4dcd;p=kivitendo-erp.git diff --git a/SL/File/Backend/Filesystem.pm b/SL/File/Backend/Filesystem.pm index 922928380..ec67d7414 100644 --- a/SL/File/Backend/Filesystem.pm +++ b/SL/File/Backend/Filesystem.pm @@ -79,6 +79,9 @@ sub save { print OUT $params{file_contents}; close(OUT); } + if ($params{mtime}) { + utime($params{mtime}, $params{mtime}, $tofile); + } return 1; } @@ -98,7 +101,7 @@ sub get_mtime { die "No file found at $path. Expected: $params{dbfile}{file_name}, file.id: $params{dbfile}{id}" if !-f $path; my @st = stat($path); - my $dt = DateTime->from_epoch(epoch => $st[9])->clone(); + my $dt = DateTime->from_epoch(epoch => $st[9], time_zone => $::locale->get_local_time_zone()->name, locale => $::lx_office_conf{system}->{language})->clone(); return $dt; }