smeserver-shared-folders/contribs8/smeserver-shared-folders-0.1-ro_on_top_dir.patch

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
--- smeserver-shared-folders-0.1/root/etc/e-smith/events/actions/share-modify   2011-06-22 16:03:19.000000000 +0200
+++ smeserver-shared-folders-0.1_mod/root/etc/e-smith/events/actions/share-modify       2011-06-22 16:16:13.000000000 +0200
@@ -112,8 +112,10 @@
        if (-d)
        {
            chmod $::dirperm, $_;
+           chmod $::dirperm, $_;
+           my $perm = ($_ eq '.') ? 'rx':'rwx';
            foreach my $group (@write){
-               $acl .= 'g:'.$group.':rwx,';
+               $acl .= 'g:'.$group.':'.$perm.',';
            }
            foreach my $group (@read){
                 $acl .= 'g:'.$group.':rx,';
1	unnilennium	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,';