Fix delete date

This commit is contained in:
Daniel Berteaud 2016-03-04 08:57:39 +01:00
parent 1addbf8eb8
commit ab7648d9c0

View File

@ -72,9 +72,11 @@ foreach my $user ($a->users){
day => $3,
);
my $delete_date = $locked->add( days => $delete );
if ( $delete_date < $now ){
print $user->key . ": Account must be deleted\n" if $debug;
push @delete, $user->key;
}
}
next;
}
my $lock_date = $user->prop('ExpireLockOn') || 'never';