smeserver-shared-folders/contribs9/smeserver-shared-folders-0.1-mod_perm_after_create.patch

diff -Nur smeserver-shared-folders-0.1/root/etc/e-smith/web/functions/shares smeserver-shared-folders-0.1_mod/root/etc/e-smith/web/functions/shares
--- smeserver-shared-folders-0.1/root/etc/e-smith/web/functions/shares  2012-04-21 02:03:43.000000000 +0200
+++ smeserver-shared-folders-0.1_mod/root/etc/e-smith/web/functions/shares      2012-04-21 02:05:07.000000000 +0200
@@ -118,7 +118,7 @@
         <description>REMOVE_DESC</description>
         <subroutine src="print_share_to_remove()" />
     </page>
-    <page name="Permissions" pre-event="turn_off_buttons()" post-event="handle_shares()">
+    <page name="Permissions" pre-event="print_status_message()" post-event="modify_perm()">
         <title>TITLE_PERMISSIONS</title>
         <field type="literal" id="descriptiongroup">
             <description>DESC_PERMISSIONS</description>
diff -Nur smeserver-shared-folders-0.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/shares.pm smeserver-shared-folders-0.1_mod/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/shares.pm
--- smeserver-shared-folders-0.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/shares.pm 2012-04-21 02:03:43.000000000 +0200
+++ smeserver-shared-folders-0.1_mod/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/shares.pm     2012-04-21 02:05:51.000000000 +0200
@@ -90,7 +90,7 @@
         my $actionModify =  $q->a({href => "${href}CreateModify&action=modify&name=$sharename"},$modify)
                       . '&nbsp;';
 
-        my $actionPerm =  $q->a({href => "${href}Permissions&action=permissions&name=$sharename"},$perm)
+        my $actionPerm =  $q->a({href => "${href}Permissions&name=$sharename"},$perm)
                       . '&nbsp;';
 
         my $actionRemove .= $q->a({href => "${href}Remove&name=$sharename&description=$sharedesc"}, $remove) 
@@ -522,9 +522,6 @@
     if ($action eq "create") {
         $self->create_share();
     }
-    elsif ($action eq 'permissions'){
-        $self->modify_perm();
-    }
     else {
         $self->modify_share();
     }
@@ -609,7 +606,7 @@
         }
 
         if (system ("/sbin/e-smith/signal-event", "share-create", $name) == 0) {
-            $self->success("SUCCESSFULLY_CREATED_SHARE");
+            $self->success("SUCCESSFULLY_CREATED_SHARE", "Permissions");
         }
         else {
             $self->error("ERROR_WHILE_CREATING_SHARE");
1	vip-ire	1.1	diff -Nur smeserver-shared-folders-0.1/root/etc/e-smith/web/functions/shares smeserver-shared-folders-0.1_mod/root/etc/e-smith/web/functions/shares
2			--- smeserver-shared-folders-0.1/root/etc/e-smith/web/functions/shares 2012-04-21 02:03:43.000000000 +0200
3			+++ smeserver-shared-folders-0.1_mod/root/etc/e-smith/web/functions/shares 2012-04-21 02:05:07.000000000 +0200
4			@@ -118,7 +118,7 @@
5			<description>REMOVE_DESC</description>
6			<subroutine src="print_share_to_remove()" />
7			</page>
8			- <page name="Permissions" pre-event="turn_off_buttons()" post-event="handle_shares()">
9			+ <page name="Permissions" pre-event="print_status_message()" post-event="modify_perm()">
10			<title>TITLE_PERMISSIONS</title>
11			<field type="literal" id="descriptiongroup">
12			<description>DESC_PERMISSIONS</description>
13			diff -Nur smeserver-shared-folders-0.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/shares.pm smeserver-shared-folders-0.1_mod/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/shares.pm
14			--- smeserver-shared-folders-0.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/shares.pm 2012-04-21 02:03:43.000000000 +0200
15			+++ smeserver-shared-folders-0.1_mod/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/shares.pm 2012-04-21 02:05:51.000000000 +0200
16			@@ -90,7 +90,7 @@
17			my $actionModify = $q->a({href => "${href}CreateModify&action=modify&name=$sharename"},$modify)
18			. ' ';
19
20			- my $actionPerm = $q->a({href => "${href}Permissions&action=permissions&name=$sharename"},$perm)
21			+ my $actionPerm = $q->a({href => "${href}Permissions&name=$sharename"},$perm)
22			. ' ';
23
24			my $actionRemove .= $q->a({href => "${href}Remove&name=$sharename&description=$sharedesc"}, $remove)
25			@@ -522,9 +522,6 @@
26			if ($action eq "create") {
27			$self->create_share();
28			}
29			- elsif ($action eq 'permissions'){
30			- $self->modify_perm();
31			- }
32			else {
33			$self->modify_share();
34			}
35			@@ -609,7 +606,7 @@
36			}
37
38			if (system ("/sbin/e-smith/signal-event", "share-create", $name) == 0) {
39			- $self->success("SUCCESSFULLY_CREATED_SHARE");
40			+ $self->success("SUCCESSFULLY_CREATED_SHARE", "Permissions");
41			}
42			else {
43			$self->error("ERROR_WHILE_CREATING_SHARE");