| 1 |
diff -Nur -x '*.orig' -x '*.rej' e-smith-ibays-1.2.0/root/etc/e-smith/db/configuration/defaults/maxIbayNameLength.maxIbaysNameLength.patch mezzanine_patched_e-smith-ibays-1.2.0/root/etc/e-smith/db/configuration/defaults/maxIbayNameLength.maxIbaysNameLength.patch |
| 2 |
--- e-smith-ibays-1.2.0/root/etc/e-smith/db/configuration/defaults/maxIbayNameLength.maxIbaysNameLength.patch 1970-01-01 01:00:00.000000000 +0100 |
| 3 |
+++ mezzanine_patched_e-smith-ibays-1.2.0/root/etc/e-smith/db/configuration/defaults/maxIbayNameLength 2008-04-17 23:37:17.000000000 +0200 |
| 4 |
@@ -0,0 +1 @@ |
| 5 |
+12 |
| 6 |
diff -Nur -x '*.orig' -x '*.rej' e-smith-ibays-1.2.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/ibays.pm mezzanine_patched_e-smith-ibays-1.2.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/ibays.pm |
| 7 |
--- e-smith-ibays-1.2.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/ibays.pm 2008-04-17 23:50:09.000000000 +0200 |
| 8 |
+++ mezzanine_patched_e-smith-ibays-1.2.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/ibays.pm 2008-04-17 23:49:35.000000000 +0200 |
| 9 |
@@ -89,7 +89,6 @@ |
| 10 |
my $class = ref($proto) || $proto; |
| 11 |
my $self = esmith::FormMagick::new($class); |
| 12 |
$self->{calling_package} = (caller)[0]; |
| 13 |
- $self->{defaultMaxLength} = 12; |
| 14 |
|
| 15 |
return $self; |
| 16 |
} |
| 17 |
@@ -220,7 +219,6 @@ |
| 18 |
my $in = $self->{cgi}->param('name') || ''; |
| 19 |
my $action = $self->{cgi}->param('action') || ''; |
| 20 |
my $maxLength = $configdb->get('maxIbayNameLength'); |
| 21 |
- $maxLength = $maxLength ? $maxLength->value : $self->{defaultMaxLength}; |
| 22 |
print qq(<tr><td colspan="2">) . $self->localise('NAME_FIELD_DESC', |
| 23 |
{maxLength => $maxLength}) . qq(</td></tr>); |
| 24 |
print qq(<tr><td class="sme-noborders-label">) . |
| 25 |
@@ -373,7 +371,7 @@ |
| 26 |
|
| 27 |
Checks the length of a given i-bay name against the maximum set in the |
| 28 |
maxIbayNameLength record of the configuration database. Defaults to a |
| 29 |
-maximum length of $self->{defaultMaxLength} if nothing is set in the config db. |
| 30 |
+maximum length of the maxIbayNameLength set in the config db. |
| 31 |
|
| 32 |
=begin testing |
| 33 |
|
| 34 |
@@ -401,12 +399,7 @@ |
| 35 |
sub max_ibay_name_length { |
| 36 |
my ($self, $data) = @_; |
| 37 |
$configdb->reload(); |
| 38 |
- my $max; |
| 39 |
- if (my $max_record = $configdb->get('maxIbayNameLength')) { |
| 40 |
- $max = $max_record->value(); |
| 41 |
- } else { |
| 42 |
- $max = $self->{defaultMaxLength}; |
| 43 |
- } |
| 44 |
+ my $max = $configdb->get('maxIbayNameLength')) { |
| 45 |
|
| 46 |
if (length($data) <= $max) { |
| 47 |
return "OK"; |
| 48 |
|
Parent Directory
| 
Revision Log
| 
Revision Graph
