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

--- smeserver-subversion-1.4/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/subversion.pm.MaxLength       2008-08-10 18:16:55.000000000 +0200
+++ smeserver-subversion-1.4/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/subversion.pm 2008-08-10 18:19:49.000000000 +0200
@@ -434,7 +434,8 @@
     my $self = shift;
     my $in = $self->{cgi}->param('name') || '';
     my $action = $self->{cgi}->param('action') || '';
-    my $maxLength = $configdb->get('maxRepositoryNameLength');
+    my $recMaxLength = $configdb->get('maxRepositoryNameLength');
+    my $maxLength = $recMaxLength->value;
     print qq(<tr><td colspan="2">) . $self->localise('NAME_FIELD_DESC',
         {maxLength => $maxLength}) . qq(</td></tr>);
     print qq(<tr><td class="sme-noborders-label">) .
1	snetram	1.2	--- smeserver-subversion-1.4/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/subversion.pm.MaxLength 2008-08-10 18:16:55.000000000 +0200
2			+++ smeserver-subversion-1.4/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/subversion.pm 2008-08-10 18:19:49.000000000 +0200
3			@@ -434,7 +434,8 @@
4			my $self = shift;
5	snetram	1.1	my $in = $self->{cgi}->param('name') \|\| '';
6			my $action = $self->{cgi}->param('action') \|\| '';
7	snetram	1.2	- my $maxLength = $configdb->get('maxRepositoryNameLength');
8			+ my $recMaxLength = $configdb->get('maxRepositoryNameLength');
9			+ my $maxLength = $recMaxLength->value;
10	snetram	1.1	print qq(<tr><td colspan="2">) . $self->localise('NAME_FIELD_DESC',
11			{maxLength => $maxLength}) . qq(</td></tr>);
12			print qq(<tr><td class="sme-noborders-label">) .