Fix handling of multi-form and multiple select form elements by emitting

a hidden form variable to make sure the form element was in the generated form.
Changes in User and ProfileField to support this.
This commit is contained in:
Colin Kuskie 2009-01-26 21:03:23 +00:00
parent 83d1203de9
commit 41da738e0e
9 changed files with 134 additions and 17 deletions

View file

@ -66,6 +66,24 @@ sub AUTOLOAD {
return $self->$method(@args);
}
#-------------------------------------------------------------------
=head2 hasParam ( $param )
Returns true if the param is part of the submitted form data, or a URL param.
=cut
sub hasParam {
my $self = shift;
my $param = shift;
return undef unless $param;
return undef unless $self->session->request;
my $hashRef = $self->session->request->param();
return exists $hashRef->{$param};
}
#-------------------------------------------------------------------
=head2 paramsHashRef ( )