From: Mark K. <seg...@us...> - 2002-09-26 17:46:29
|
Update of /cvsroot/formmagick/formmagick/lib/CGI/FormMagick In directory usw-pr-cvs1:/tmp/cvs-serv8475/lib/CGI/FormMagick Modified Files: Tag: MITEL-0_87 L10N.pm Log Message: Two patches against 0.87: one security fix that also requires a patched CGI::Persistent (the main culprit), and code to trim leading and trailing whitespace from lexicon entries. Index: L10N.pm =================================================================== RCS file: /cvsroot/formmagick/formmagick/lib/CGI/FormMagick/L10N.pm,v retrieving revision 1.37 retrieving revision 1.37.2.1 diff -C2 -r1.37 -r1.37.2.1 *** L10N.pm 21 May 2002 18:32:11 -0000 1.37 --- L10N.pm 26 Sep 2002 17:46:25 -0000 1.37.2.1 *************** *** 347,350 **** --- 347,352 ---- $trans = $e->{content}->[8]->[2]; if ($base && $trans) { + $trans =~ /^\s*([\s\S]+\S+)\s*$/; #strip leading/trailing blanks + $trans = $1; $return_lexicon{$base} = ($iconv ? $iconv->convert($trans) |