fixing the ->param ->body distinction issue.

This commit is contained in:
Matthew Wilson 2006-01-23 05:18:54 +00:00
parent b045ac2d61
commit f64ec77d8a
34 changed files with 41 additions and 38 deletions

View file

@ -1168,7 +1168,7 @@ sub www_respond {
return "" unless ($self->session->scratch->get($varname));
my $userId = ($self->get("anonymous")) ? substr(md5_hex($self->session->user->userId),0,8) : $self->session->user->userId;
my $terminate = 0;
foreach my $key ($self->session->request->param) {
foreach my $key ($self->session->form->param) {
if ($key =~ /^answerId_(.+)$/) {
my $id = $1;
my ($previousResponse) = $self->session->db->quickArray("select count(*) from Survey_questionResponse