koozali
/
smeserver-expire-accounts
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Chown auto reply dir to current user

This commit is contained in:
Daniel Berteaud 2016-02-29 18:52:47 +01:00
parent 3954a9445f
commit b468604304
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
root/etc/e-smith/events/actions/user-update-auto-response
View File

@ -3,6 +3,7 @@
use strict;
use esmith::AccountsDB;
use esmith::templates;
use esmith::util;
use User::pwent;
my $a = esmith::AccountsDB->open or
@ -26,7 +27,10 @@ foreach my $user (@users){
my $userName = $user->key;
my $home = getpwnam($userName)->dir;
mkdir $home . '/.lock-auto-reply' unless -d $home . '/.lock-auto-reply';
unless (-d $home . '/.lock-auto-reply'){
mkdir $home . '/.lock-auto-reply';
esmith::util::chownFile($userName, $userName, $home . '/.lock-auto-reply');
}
esmith::templates::processTemplate ({
MORE_DATA => { USERNAME => $userName },