Grant group write perm
This commit is contained in:
parent
7752f23771
commit
4be615ba2c
|
@ -56,6 +56,7 @@ sub set_acl {
|
|||
my $user = shift;
|
||||
die "Missing username\n" unless ($user);
|
||||
die "Couldn't find $user"."'s home dir\n" unless (-e "/home/e-smith/files/users/$user");
|
||||
find(\&dirperm, "/home/e-smith/files/users/$user/Maildir");
|
||||
die "Error applying permissions to $user 's Maildir\n" unless (
|
||||
# sharedmailbox group needs read / write access on Maildir
|
||||
system('/usr/bin/setfacl',
|
||||
|
@ -71,7 +72,6 @@ sub set_acl {
|
|||
'g:sharedmailbox:x',
|
||||
"/home/e-smith/files/users/$user") == 0
|
||||
);
|
||||
find(\&sgid, "/home/e-smith/files/users/$user/Maildir");
|
||||
}
|
||||
|
||||
# The kernel will handle group perms when a user
|
||||
|
@ -79,9 +79,9 @@ sub set_acl {
|
|||
# This will prevent dovecot errors, see
|
||||
# http://wiki2.dovecot.org/SharedMailboxes/Permissions and
|
||||
# http://wiki2.dovecot.org/Errors/ChgrpNoPerm
|
||||
sub sgid {
|
||||
sub dirperm {
|
||||
system('/bin/chmod',
|
||||
'g+s',
|
||||
'g+ws',
|
||||
"$_") if (-d);
|
||||
}
|
||||
|
||||
|
|
|
@ -1,5 +1,5 @@
|
|||
%define version 0.1
|
||||
%define release 0.beta26
|
||||
%define release 0.beta27
|
||||
%define name smeserver-dovecot
|
||||
|
||||
|
||||
|
|
Loading…
Reference in New Issue