trick_taint in setter

master
Vitaliy Filippov 2014-04-18 15:17:42 +04:00
parent cae8239fda
commit efb537b776
1 changed files with 5 additions and 1 deletions

View File

@ -1481,7 +1481,11 @@ sub set
{
$self->make_dirty;
$value = $self->$setter($value, $field);
$self->{$field} = $value if defined $value;
if (defined $value)
{
trick_taint($value);
$self->{$field} = $value;
}
$self->_check_field_permission($field);
return $value;
}