fixed captcha to work even in not htmlform environments

added captch field to contact the maintainer form in matrix
added default label to captcha
This commit is contained in:
JT Smith 2006-05-05 20:20:15 +00:00
parent dea8fdc109
commit 6be1d2f76e
4 changed files with 18 additions and 3 deletions

View file

@ -1104,7 +1104,7 @@ sub www_viewDetail {
}
$var{"discussion"} = $forum->view;
$var{'isLoggedIn'} = ($self->session->user->userId ne "1");
if ($self->session->form->process("do") eq "sendEmail") {
if ($self->session->form->process("do") eq "sendEmail" && $self->session->form->process("verify","captcha")) {
if ($self->session->form->process("body") ne "") {
my $u = WebGUI::User->new($self->session, $listing->{maintainerId});
my $mail = WebGUI::Mail::Send->create($self->session, {to=>$u->profileField("email"),subject=>$listing->{productName}." - ".$self->session->form->process("subject"),from=>$self->session->form->process("from")});
@ -1149,6 +1149,9 @@ sub www_viewDetail {
-name=>"listingId",
-value=>$listingId
);
$f->captcha(
-name=>"verify"
);
$f->email(
-extras=>'class="content"',
-name=>"from",