Textarea needs to be filtered when shown as HTML
This commit is contained in:
parent
ef53b51985
commit
dc6a225c27
2 changed files with 11 additions and 0 deletions
|
|
@ -132,6 +132,11 @@ sub getValue {
|
|||
return WebGUI::HTML::cleanSegment($self->SUPER::getValue(@_));
|
||||
}
|
||||
|
||||
sub getValueAsHtml {
|
||||
my $self = shift;
|
||||
return $self->WebGUI::Form::Control::getValueAsHtml(@_);
|
||||
}
|
||||
|
||||
|
||||
#-------------------------------------------------------------------
|
||||
|
||||
|
|
|
|||
|
|
@ -172,6 +172,12 @@ sub toHtml {
|
|||
return $out;
|
||||
}
|
||||
|
||||
sub getValueAsHtml {
|
||||
my $self = shift;
|
||||
my $value = $self->SUPER::getValueAsHtml(@_);
|
||||
$value = WebGUI::HTML::filter($value, 'text');
|
||||
return $value;
|
||||
}
|
||||
|
||||
|
||||
1;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue