Made it possible to actually save Treads again....
This commit is contained in:
parent
d5dfa451df
commit
74e3f42fe4
1 changed files with 9 additions and 5 deletions
|
|
@ -582,14 +582,18 @@ sub postProcess {
|
||||||
$self->SUPER::postProcess;
|
$self->SUPER::postProcess;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
#-------------------------------------------------------------------
|
||||||
sub processPropertiesFromFormPost {
|
sub processPropertiesFromFormPost {
|
||||||
my $self = shift;
|
my $self = shift;
|
||||||
if ($self->isNew && $self->getParent->getValue('useCaptcha')) {
|
|
||||||
my $captcha = $self->session->form->process("captcha","Captcha");
|
|
||||||
return [ 'invalid captcha' ];
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
|
if ($self->isNew && $self->getParent->getValue('useCaptcha')) {
|
||||||
|
my $captchaOk = $self->session->form->process("captcha","Captcha");
|
||||||
|
|
||||||
|
return [ 'invalid captcha' ] unless $captchaOk;
|
||||||
|
}
|
||||||
|
|
||||||
|
return $self->SUPER::processPropertiesFromFormPost;
|
||||||
|
}
|
||||||
|
|
||||||
#-------------------------------------------------------------------
|
#-------------------------------------------------------------------
|
||||||
sub purge {
|
sub purge {
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue