From a5c824d3fb0e380ebdcb887d63eb8b5c8a940324 Mon Sep 17 00:00:00 2001 From: Frank Dillon Date: Wed, 11 Jul 2007 18:04:17 +0000 Subject: [PATCH] Fixed bonehead syntax errors --- lib/WebGUI/Asset/Wobject/Survey.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/WebGUI/Asset/Wobject/Survey.pm b/lib/WebGUI/Asset/Wobject/Survey.pm index 9e02aacd1..84daefd28 100644 --- a/lib/WebGUI/Asset/Wobject/Survey.pm +++ b/lib/WebGUI/Asset/Wobject/Survey.pm @@ -1219,8 +1219,8 @@ sub www_respond { #If user has not responded before, create the responseId binding the survey to this session: fdillon 7-11-07 my $responseCount = $self->getResponseCount; my $responseId = $self->getResponseId(); - my $isFirstResponse = ($rc == 0 && !(defined $rid)); - my $canRespondAgain = ($rc < $self->get("maxResponsesPerUser")); + my $isFirstResponse = ($responseCount == 0 && !(defined $responseId)); + my $canRespondAgain = ($responseCount < $self->get("maxResponsesPerUser")); if ($isFirstResponse || ($self->session->form->process("startNew") && $canRespondAgain)) { $self->generateResponseId; }