--- rpms/smeserver-subversion/contribs7/smeserver-subversion-1.4-MaxLength.patch 2008/08/10 15:59:53 1.1 +++ rpms/smeserver-subversion/contribs7/smeserver-subversion-1.4-MaxLength.patch 2008/08/10 16:23:02 1.2 @@ -1,10 +1,12 @@ ---- smeserver-subversion-1.4/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/subversion.pm.MaxLength 2008-08-10 17:53:26.000000000 +0200 -+++ smeserver-subversion-1.4/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/subversion.pm 2008-08-10 17:54:13.000000000 +0200 -@@ -435,6 +435,7 @@ +--- 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'); -+ $maxLength = $maxLength->value; +- my $maxLength = $configdb->get('maxRepositoryNameLength'); ++ my $recMaxLength = $configdb->get('maxRepositoryNameLength'); ++ my $maxLength = $recMaxLength->value; print qq() . $self->localise('NAME_FIELD_DESC', {maxLength => $maxLength}) . qq(); print qq() .