|
|
@ -16,6 +16,7 @@ my $event = $ARGV[0]; |
|
|
|
|
|
|
|
|
|
|
|
# SharedMailboxes disabled ? |
|
|
|
# SharedMailboxes disabled ? |
|
|
|
if (($dovecot->prop('SharedMailbox') || 'disabled') eq 'disabled'){ |
|
|
|
if (($dovecot->prop('SharedMailbox') || 'disabled') eq 'disabled'){ |
|
|
|
|
|
|
|
if (($dovecot->prop('SharedMailboxAcl') || 'yes') ne 'no'){ |
|
|
|
foreach my $user ($a->users){ |
|
|
|
foreach my $user ($a->users){ |
|
|
|
my $name = $user->key; |
|
|
|
my $name = $user->key; |
|
|
|
die "Error removing SharedMailbox ACLs ($name"."'s Maildir)\n" unless ( |
|
|
|
die "Error removing SharedMailbox ACLs ($name"."'s Maildir)\n" unless ( |
|
|
@ -30,6 +31,7 @@ if (($dovecot->prop('SharedMailbox') || 'disabled') eq 'disabled'){ |
|
|
|
"/home/e-smith/files/users/$name/Maildir") == 0 |
|
|
|
"/home/e-smith/files/users/$name/Maildir") == 0 |
|
|
|
); |
|
|
|
); |
|
|
|
} |
|
|
|
} |
|
|
|
|
|
|
|
} |
|
|
|
$dovecot->set_prop('SharedMailboxAcl','no'); |
|
|
|
$dovecot->set_prop('SharedMailboxAcl','no'); |
|
|
|
exit(0); |
|
|
|
exit(0); |
|
|
|
} |
|
|
|
} |
|
|
|