1 |
vip-ire |
1.1 |
diff -Nur smeserver-shared-folders-0.1/root/etc/e-smith/events/actions/share-modify smeserver-shared-folders-0.1_mod/root/etc/e-smith/events/actions/share-modify |
2 |
|
|
--- smeserver-shared-folders-0.1/root/etc/e-smith/events/actions/share-modify 2011-06-22 16:03:19.000000000 +0200 |
3 |
|
|
+++ smeserver-shared-folders-0.1_mod/root/etc/e-smith/events/actions/share-modify 2011-06-22 16:16:13.000000000 +0200 |
4 |
|
|
@@ -112,8 +112,10 @@ |
5 |
|
|
if (-d) |
6 |
|
|
{ |
7 |
|
|
chmod $::dirperm, $_; |
8 |
|
|
+ chmod $::dirperm, $_; |
9 |
|
|
+ my $perm = ($_ eq '.') ? 'rx':'rwx'; |
10 |
|
|
foreach my $group (@write){ |
11 |
|
|
- $acl .= 'g:'.$group.':rwx,'; |
12 |
|
|
+ $acl .= 'g:'.$group.':'.$perm.','; |
13 |
|
|
} |
14 |
|
|
foreach my $group (@read){ |
15 |
|
|
$acl .= 'g:'.$group.':rx,'; |