1 |
snetram |
1.1 |
--- smeserver-subversion-1.4/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/subversion.pm.ClarifyPanel3 2008-05-09 16:25:07.000000000 +0200 |
2 |
|
|
+++ smeserver-subversion-1.4/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/subversion.pm 2008-05-09 16:29:23.000000000 +0200 |
3 |
|
|
@@ -438,9 +438,6 @@ |
4 |
|
|
</td> |
5 |
|
|
); |
6 |
|
|
|
7 |
|
|
- print qq(<tr><td colspan="2">) . |
8 |
|
|
- $self->localise('PRIVILEGES') . qq(</td></tr>\n); |
9 |
|
|
- |
10 |
|
|
# Read the values for each field from the accounts db and store |
11 |
|
|
# them in the cgi object so our form will have the correct |
12 |
|
|
# info displayed. |
13 |
|
|
@@ -450,6 +447,10 @@ |
14 |
|
|
|
15 |
|
|
$q->param(-name=>'description', |
16 |
|
|
-value=>$rec->prop('Description')); |
17 |
|
|
+ $q->Tr ( |
18 |
|
|
+ esmith::cgi::genSmallCell($q, "test" ,"normal"), |
19 |
|
|
+ esmith::cgi::genSmallCell($q, $self->localise('PRIVILEGES') ,"normal")); |
20 |
|
|
+ |
21 |
|
|
$q->param(-name=>'groupsRead', |
22 |
|
|
-value=>join(FS, split(FS, $rec->prop('GroupsRead')))); |
23 |
|
|
$q->param(-name=>'usersRead', |