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