From: <Cra...@nt...> - 2005-04-25 10:25:33
|
Author: CrawfordCurrie Date: 2005-04-25 03:24:13 -0700 (Mon, 25 Apr 2005) New Revision: 4111 Modified: twiki/branches/DEVELOP/lib/TWiki/Form.pm Log: DevelopBranchQuestions: reverted filtering of form field names to Cairo behaviour, since TW pointed out a problem that might make it fail Modified: twiki/branches/DEVELOP/lib/TWiki/Form.pm =================================================================== --- twiki/branches/DEVELOP/lib/TWiki/Form.pm 2005-04-25 10:14:15 UTC (rev 4110) +++ twiki/branches/DEVELOP/lib/TWiki/Form.pm 2005-04-25 10:24:13 UTC (rev 4111) @@ -130,14 +130,15 @@ return \@fields; } - +# Chop out all except A-Za-z0-9_. +# I'm sure there must have been a good reason for this once. sub _cleanField { my( $text ) = @_; $text = '' if( ! $text ); # TODO: make this dependent on a 'character set includes non-alpha' # setting in TWiki.cfg - and do same in Render.pm re 8859 test. # I18N: don't get rid of non-ASCII characters - # $text =~ s/[^A-Za-z0-9_\.]//go; # Need do for web.topic + $text =~ s/[^A-Za-z0-9_\.]//go; return $text; } |