forward port of newline/cr bug fix
This commit is contained in:
parent
b13ba6a2c2
commit
c68c65a504
5 changed files with 25 additions and 1 deletions
|
|
@ -87,7 +87,9 @@ the list.
|
|||
sub getValueFromPost {
|
||||
my $self = shift;
|
||||
if ($self->session->form->param($self->get("name")."_new")) {
|
||||
return $self->session->form->param($self->get("name")."_new");
|
||||
my $formValue = $self->session->form->param($self->get("name")."_new");
|
||||
$formValue =~ tr/\r\n//d;
|
||||
return $formValue;
|
||||
}
|
||||
return $self->SUPER::getValueFromPost;
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue