Fix home RecycleBin purge by using mtime instead of atime

9 years ago · 74846a25bb
parent 1fb3be07ab
commit 74846a25bb
1 changed files with 2 additions and 2 deletions
--- a/root/etc/cron.daily/purge-homes-recycle
+++ b/root/etc/cron.daily/purge-homes-recycle
@ -46,8 +46,8 @@ foreach my $user ($a->get_all_by_prop(type=>'user')){
 sub remove{
    # Remove files with last modification older than $retention
    if ( -f ){
-        my $atime = stat($_)->atime;
+        my $mtime = stat($_)->mtime;
-        (time() - $atime > $retention) && unlink($_);
+        (time() - $mtime > $retention) && unlink($_);
    }
    # Remove empty directories
    elsif ( -d ){