oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

forward port of newline/cr bug fix

Browse source
This commit is contained in:
Colin Kuskie 2006-02-10 21:18:13 +00:00
parent b13ba6a2c2
commit c68c65a504
5 changed files with 25 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

1
lib/WebGUI/Form/Zipcode.pm
View file

@ -86,6 +86,7 @@ Returns a validated form post result. If the result does not pass validation, it
sub getValueFromPost {
my $self = shift;
my $value = $self->session->form->param($self->get("name"));
$value =~ tr/\r\n//d;
if ($value =~ /^[A-Z\d\s\-]+$/) {
return $value;
}