smeserver-subversion/contribs7/smeserver-subversion-1.4-ClarifyPanel.patch

--- smeserver-subversion-1.4/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/subversion.pm.ClarifyPanel    2008-08-10 16:54:50.000000000 +0200
+++ smeserver-subversion-1.4/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/subversion.pm 2008-08-10 16:55:33.000000000 +0200
@@ -44,6 +44,7 @@
 our @EXPORT = qw(
     print_repository_table
     print_repository_name_field
+    print_privileges
     print_vhost_message
     group_list
     user_list
@@ -269,6 +270,19 @@
     return "";
 }
 
+=head2 print_privileges()
+
+Prints a warning message that vhosts whose content is this repository will be modified to point to primary site.
+
+=cut
+
+sub print_privileges {
+    my $self = shift;
+    my $q = $self->{cgi};
+    print qq(<tr><td colspan="2">) . $self->localise('PRIVILEGES') . qq(</td></tr>);
+    return "";
+}
+
 =head2 print_vhost_message()
 
 Prints a warning message that vhosts whose content is this repository will be modified to point to primary site.
--- smeserver-subversion-1.4/root/etc/e-smith/web/functions/subversion.ClarifyPanel     2008-08-10 16:54:50.000000000 +0200
+++ smeserver-subversion-1.4/root/etc/e-smith/web/functions/subversion  2008-08-10 16:55:33.000000000 +0200
@@ -150,6 +150,8 @@
            <label>MOD_MIME_USE_PATH_INFO</label>
        </field>
         
+        <subroutine src="print_privileges()" />
+
         <field 
             type="select" 
             id="groupsRead" 
--- smeserver-subversion-1.4/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/subversion.ClarifyPanel    2008-08-10 16:54:50.000000000 +0200
+++ smeserver-subversion-1.4/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/subversion 2008-08-10 16:56:02.000000000 +0200
@@ -124,28 +124,34 @@
     <entry>
         <base>GROUPS_READ</base>
         <trans>
-            Groups (read-only access)
+            Groups (read access)
         </trans>
     </entry>
     <entry>
         <base>GROUPS_WRITE</base>
         <trans>
-            Groups (full access)
+            Groups (write access)
         </trans>
     </entry>
     <entry>
         <base>USERS_READ</base>
         <trans>
-            Users (read only access)
+            Users (read access)
         </trans>
     </entry>
     <entry>
         <base>USERS_WRITE</base>
         <trans>
-            Users (full access)
+            Users (write access)
         </trans>
     </entry>
     <entry>
+        <base>PRIVILEGES</base>
+        <trans>
+            If you set neither group nor user setting for a privilege, the privilege will default to anonymous access. The only exception is when you have specified only read privileges (either for user(s), group(s) or both), there will be no anonymous write access.<br />If you want your user(s) or group(s) to have full access specify them in both the read and the write box.
+         </trans>
+     </entry>
+    <entry>
         <base>ERROR_WHILE_CREATING_REPOSITORY</base>
         <trans>
             An error occurred while creating the repository.
1	--- smeserver-subversion-1.4/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/subversion.pm.ClarifyPanel 2008-08-10 16:54:50.000000000 +0200
2	+++ smeserver-subversion-1.4/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/subversion.pm 2008-08-10 16:55:33.000000000 +0200
3	@@ -44,6 +44,7 @@
4	our @EXPORT = qw(
5	print_repository_table
6	print_repository_name_field
7	+ print_privileges
8	print_vhost_message
9	group_list
10	user_list
11	@@ -269,6 +270,19 @@
12	return "";
13	}
14
15	+=head2 print_privileges()
16	+
17	+Prints a warning message that vhosts whose content is this repository will be modified to point to primary site.
18	+
19	+=cut
20	+
21	+sub print_privileges {
22	+ my $self = shift;
23	+ my $q = $self->{cgi};
24	+ print qq(<tr><td colspan="2">) . $self->localise('PRIVILEGES') . qq(</td></tr>);
25	+ return "";
26	+}
27	+
28	=head2 print_vhost_message()
29
30	Prints a warning message that vhosts whose content is this repository will be modified to point to primary site.
31	--- smeserver-subversion-1.4/root/etc/e-smith/web/functions/subversion.ClarifyPanel 2008-08-10 16:54:50.000000000 +0200
32	+++ smeserver-subversion-1.4/root/etc/e-smith/web/functions/subversion 2008-08-10 16:55:33.000000000 +0200
33	@@ -150,6 +150,8 @@
34	<label>MOD_MIME_USE_PATH_INFO</label>
35	</field>
36
37	+ <subroutine src="print_privileges()" />
38	+
39	<field
40	type="select"
41	id="groupsRead"
42	--- smeserver-subversion-1.4/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/subversion.ClarifyPanel 2008-08-10 16:54:50.000000000 +0200
43	+++ smeserver-subversion-1.4/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/subversion 2008-08-10 16:56:02.000000000 +0200
44	@@ -124,28 +124,34 @@
45	<entry>
46	<base>GROUPS_READ</base>
47	<trans>
48	- Groups (read-only access)
49	+ Groups (read access)
50	</trans>
51	</entry>
52	<entry>
53	<base>GROUPS_WRITE</base>
54	<trans>
55	- Groups (full access)
56	+ Groups (write access)
57	</trans>
58	</entry>
59	<entry>
60	<base>USERS_READ</base>
61	<trans>
62	- Users (read only access)
63	+ Users (read access)
64	</trans>
65	</entry>
66	<entry>
67	<base>USERS_WRITE</base>
68	<trans>
69	- Users (full access)
70	+ Users (write access)
71	</trans>
72	</entry>
73	<entry>
74	+ <base>PRIVILEGES</base>
75	+ <trans>
76	+ If you set neither group nor user setting for a privilege, the privilege will default to anonymous access. The only exception is when you have specified only read privileges (either for user(s), group(s) or both), there will be no anonymous write access.<br />If you want your user(s) or group(s) to have full access specify them in both the read and the write box.
77	+ </trans>
78	+ </entry>
79	+ <entry>
80	<base>ERROR_WHILE_CREATING_REPOSITORY</base>
81	<trans>
82	An error occurred while creating the repository.