Updated Survey.pm to use new ResponseJSON.pm methods

This commit is contained in:
Patrick Donelan 2009-02-06 01:56:35 +00:00
parent 345989370f
commit 3340a675b7

View file

@ -874,10 +874,10 @@ sub www_loadQuestions {
my @questions;
eval { @questions = $self->response->nextQuestions(); };
my $section = $self->response->nextSection();
my $section = $self->response->nextResponseSection();
#return $self->prepareShowSurveyTemplate($section,$questions);
$section->{id} = $self->response->nextSectionId();
$section->{id} = $self->response->nextResponseSectionIndex();
$section->{wasRestarted} = $wasRestarted;
my $text = $self->prepareShowSurveyTemplate( $section, \@questions );