parent
b681887c57
commit
cd83a2ddde
|
@ -125,7 +125,7 @@ foreach my $u (@delete){
|
||||||
if ( $archive =~ m/^yes|enabled|1|on$/ ){
|
if ( $archive =~ m/^yes|enabled|1|on$/ ){
|
||||||
# Suspend email delivery, prevent tar ending with exit code 1
|
# Suspend email delivery, prevent tar ending with exit code 1
|
||||||
# because Maildir changed during archive
|
# because Maildir changed during archive
|
||||||
system('chmod', '+t', getpwnam($u)->dir)
|
system('chmod', '+t', getpwnam($u)->dir);
|
||||||
my $tar = $archive_path . '/' . $u . '-' . $now->ymd . '.tar.' . $archive_ext;
|
my $tar = $archive_path . '/' . $u . '-' . $now->ymd . '.tar.' . $archive_ext;
|
||||||
my $res = system(
|
my $res = system(
|
||||||
'tar',
|
'tar',
|
||||||
|
|
Loading…
Reference in New Issue