From: Wolfram Schneider Date: Wed, 21 Apr 2010 13:31:38 +0000 (+0200) Subject: strips whitespaces at start and ends of fields: bug #3369 X-Git-Tag: CPAN-v1.02~105 X-Git-Url: http://sru.miketaylor.org.uk/?a=commitdiff_plain;h=a5dd8537772021ab6cd0d5221462feed60015ddc;p=irspy-moved-to-github.git strips whitespaces at start and ends of fields: bug #3369 --- diff --git a/web/htdocs/details/edit.mc b/web/htdocs/details/edit.mc index 7f297b8..bfe3836 100644 --- a/web/htdocs/details/edit.mc +++ b/web/htdocs/details/edit.mc @@ -342,7 +342,7 @@ my %fieldsByKey = map { ( $_->[0], $_) } @fields; my %data; foreach my $key (&utf8param($r)) { next if grep { $key eq $_ } qw(op id update); - $data{$key} = utf8param($r, $key); + $data{$key} = trimField( utf8param($r, $key) ); } my @changedFields = modify_xml_document($xc, \%fieldsByKey, \%data); if ($update && @changedFields) {