/[smeserver]/rpms/perl-CGI-FormMagick/sme8/perl-CGI-FormMagick-0.92-nodata.patch
ViewVC logotype

Contents of /rpms/perl-CGI-FormMagick/sme8/perl-CGI-FormMagick-0.92-nodata.patch

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.1 - (show annotations) (download)
Tue Jun 12 20:19:50 2007 UTC (17 years, 4 months ago) by slords
Branch: MAIN
CVS Tags: perl-CGI-FormMagick-0_92-16_el5_sme, perl-CGI-FormMagick-0_92-12_el5_sme, perl-CGI-FormMagick-0_92-18_el5_sme, perl-CGI-FormMagick-0_92-19_el5_sme, perl-CGI-FormMagick-0_92-22_el5_sme, perl-CGI-FormMagick-0_92-21_el5_sme, perl-CGI-FormMagick-0_92-13_el5_sme, perl-CGI-FormMagick-0_92-20_el5_sme, perl-CGI-FormMagick-0_92-15_el5_sme, perl-CGI-FormMagick-0_92-17_el5_sme, perl-CGI-FormMagick-0_92-23_el5_sme, perl-CGI-FormMagick-0_92-11_el5_sme, perl-CGI-FormMagick-0_92-14_el5_sme, HEAD
See changelog

1 --- perl-CGI-FormMagick-0.92/lib/CGI/FormMagick/Validator.pm.nodata 2007-06-12 12:05:18.000000000 -0600
2 +++ perl-CGI-FormMagick-0.92/lib/CGI/FormMagick/Validator.pm 2007-06-12 12:06:05.000000000 -0600
3 @@ -460,11 +460,11 @@
4
5 # Trim leading and trailing whitespace from the field data, unless
6 # there is a notrim attr set to true.
7 - if ($field->{id} and $info->{type} ne 'literal' and not $info->{notrim})
8 + if ($field->{id} and not $info->{notrim})
9 {
10 $self->debug_msg("Trimming whitespace around field $field->{id}");
11 my $data = $self->{cgi}->param($field->{id});
12 - if ($data =~ s/^\s+|\s+$//g)
13 + if (defined $data && $data =~ s/^\s+|\s+$//g)
14 {
15 $self->debug_msg("Found whitespace to trim, resaving param");
16 $self->{cgi}->param(-name => $field->{id},

admin@koozali.org
ViewVC Help
Powered by ViewVC 1.2.1 RSS 2.0 feed